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4b^0Sfc©, tm ram i p?y?'jy? 
fflrox^ucu, zipy^sr-y©*,©# 
®;bnriA5o zip dii, SBcaors 

Mlz±LZZgM?g>S’'T?(D LSI A'yX 

~'j(oztT, dip 

)X"jSt- yc<6^r. ni/Bnc»Eis 

©^UStTWCo 

MA liB*l§£&©fc®©256K JU S 
©SW^-S'tf ROM 4b*ttriA5A\ 3 



nBflt 4 XXII ±"J SfflVXb7 ROM 1 
®<Dtf.MZ, JIS 999 1 9 2 &WD7X 
>F£<!: : &l;:M«>6nrU5<, 

so©* 

sgicsssnriAsax. i &mm, 

t'ti o j ■< xcm^ao fcisstrassz <t 

A'frA'So 

tv 7S7 u > h □ -ib mm s- 

<D^mizi/—hS"C?ff)?y^F'yyjL'?— 
^btftefrftruszitesfLiAo 
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VAtfm^SIZttiT:, S0-^c r 65,536e© 
IS/WD>ZL-tf-©r^ 
rB3D58iAAHtfl'e:i'B£, SiSUC 
t\So *cr/\-v*;ia-3.©»5£tt 
r»&<, □>ta-5^'7 ; 57-r'yC77.© 
tSUEfcV 

^vwmzz(Dm<DmmFn*-ti-(b 
^□ ; E-^3>t:T'7rcvA^®^n^© 
r&3. cnB, va flKr57-r^«i 
#, iA#efiie©*i,\ ! &©'c»«j&«ttB 
orus. 

zzris, ^cre-s/s^t^cffito 
nis. cm £iai;©, va ttr^Tr^-hTK 

OiUjetfC^o &3, ZZT'ZmftZIz 

r tr^r^-h/K-K^ss^Sj rpitt 

UTU&. 

/• 




gUSO 
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U4MMM*WSHPMin 
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m 

n 
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* 

m 

3 

D 

m 

it 



®&yn / 7 : ?L±\z&-D-z%thtt<b 







PART.1 [Y) A^U/TO-/ 

\ m y\ m y FA-MA-VA 



FA/MACD 



# 

Sec.l CHECK IN Wy^M1£ FA/MA 
Sec.2 vyyvytryn <J=5U studio 88 
Sec.3 FM 

Sec. 4 B.a.—V5s J py i y'<0[ZsiZ/7&yY*s.n.—V % yQ 



PC-8801 FA/MA #88^U-X®tt Ml 

Aoi Us ' £'®«sg® ® &T? 1 =&ia=&j'£ i" 
'^nrUVs®^ LT 

' / v v □ Sr mse 

y^'zL-si 

u&a£3 izsoE'''i'dr'PARf.ir' 
ISttO > Ur® FA/MA ** ’ 
iSfi^Ur^cK 




FA/MAG) 
OPNAilJ? 

PC8801-FA / MA J: PC-8800 v' 'J 

-rfufHftfcfrf-fryKtf-Kfctt, - 
ftir-ftCttfefiTSfcFM WiSf-y 
7° OPN (YM2203) t ttHfc !>, 5 6i:^ 
»" - K T 7 7° L tzmr 7 7° OPN A (YM 
2608) 

^ iftti ©Sts' J'-felM iF'f" 7 7°©$ 
H6*rJ:tffei'j|ruoi'TffL<«WBWrLt: 

o 

&DS3 

C © OPNA Uoi’T tS£ B fl "f S hu I-, m 
&rtJ^i:m®o-Ci.'S ^©^©FMWS 



IC Coi'TIMUr Li to 
&-tf , Sin i: c: © i 5 4 © 

*> 1 1 ' 5 t , ^0*3^-f i OPNA iun 
(, FM flfSf- y/Cii’UJ If** 0 3r 
**^ic-r*5*‘C>-rto 

OPN (YM2203) 

^ tin i> 5 s<- v *a- 3 > ©* 

r 7ClIj 

FM WiH ^ -7 T't'-r o PC-8801mkIISR VX 
Pt©*&i:i*«*£fB3ti, i t; Z ©fife© 

n-CfcD, 5SnS>&l'Alii'&i' ti’5 

1*1 SB t: li 4 Jj-^W-^#^©FM Will 
SB** 3 x t SSG Wi®** h* 7 * J'*' L 
XX^Xi'ito 




f- •> r©14SI t LTIi, *^v-7**4 
offl^-g-b 5 o T i- ' i t *• c> %i¥ 1 i: l*+ 
1'4©-Ct* f , 4 
1 : .£ A FM W** 3 ^ L *>1£ i fc I' © r d 
<D1-v7t'M-Ci t fcc*£fr*«9 tt 
* tit*** 0 it. ifeStti: r if.'j SB# 
ii LFO mwi- y 7° 1 : 4 < , k'7' 7 - h 
fe^rSBV 7 h 7i7t'1rfc& I) 

wr«c c, 

PC-9801© «t 5 &16 t * 7 t « U t> i ts L 

yy-x-czvx 5 Kmm 
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OPNA(7)F , 9gP7 r P "j 9 



l/OAl 



□ c 



AGND ANALOG OUT 

— o o 

I I 



ROM 


— "I h 


i— 1 TIMER & LFO 1 1 SS 

‘ j ‘ j 




1 b 


I J 

1 


BUS 


1 ~ t= 


-T^r-V^r^ 




— J r r 


REG . 


-A- 


ADPCM |- 


i H L 




| TIMING GEN | | MEMORY CONTROL 



t I till 



I I I I I I I 



FMS®S 


**» 




f'U'-fr 


4a 


7JUl') XA 


8a 


9 Al- 


A, B (YM2203UW U) 


um* 


U R, L+RlCS^lI)lt 


lfo«*i 


AM, PM, AMD, PMD, FREQ 


*OT«1 


YM2203 1 |H) U 


SSG88 


**» 


3* 


I/O*"- F 


*0 




YM2203 1 1=1 U 


yxAS 


**# 


6£, PCM-ttV-^y >9 




A'O’Unt. 


LRiMW 


L, R, L+RlCJ9;S«r(|g 




£*SS^fcJ:O f F-*A<U"'«A' 


ADPCM 


v->y)>9u-y 


1.8KHz — 16KHz 


PCMt-y F» 


8 t-y h 


adpcm en» 


4t7 F 


mwis- f 


55.5KHZ 


r-9j>*>j 


ttttRAM, ROM fc J: D'CPU fli > * 0 


*«>*■; 


*X256K/<-f F 


LR*J*I 


L, R, L+RIC»SW*I 



-Tv? Lftwiiur?e&fti' 

tft* fc.CPU »:**& iz 

t U ft 9 , SR «C if © tta^- t* 

6 MBt-i-c** {tit t «#* fr a 3? o -C j 
I’i Ifc. 

OPL(YM3526)^fc|J 
OPL I (YM3812) 

^niiOPN iliio fc<J£t:, 1*4 
xSfc t>0*'*v-*0Sfcg|®it'«f> 
LT 2oC L, ftfc S i:±#0*M xft* 
itz, ju 

ttscsar-r **-e lfo mm. twiit 

ibHt. » & C, ii£© FM ***- K 
©(**■(: y x'a*- K 1 1- 5 ■*- K**Jb U , 
t FM*ii6*4 xi:4 *> i 
t*». *^fc*S'i'-**«oTlBraM::5 

o©n'A*stw: t**rs i-r. 

•$**- K«:ii 
r MIDI MICRO MUSIC A ^-7i- 
^j(U-5?^4y h 7-^)4: t'*** 
Ht. C HI* PC-9800 S' y - x'lfi] It 0 * 
- Fft* 1 , OPL -7 7°0l4flg t L T li, 
**Wi:E*3tifc** y T4 ©#i' {>0 
t'-ro-t', in«:oi'Tu:ifcj5!i0*^i: 
v*-h Lfci’ t-Bi'ito 

3 OPM (YM2151) 

n-Cfcy, £iRi:l&© r^sgj tLTii 
fflt sttsgsrf^ fcf - * rt*+ . 
*#liOPN trat < 

roFMMrrt**, 

l*i. JUi&tt t'T’x, W03>ha 
5 LF0«^**o >, LR X f u 

*8*lGfM0i:+ 

*- K*Ii PC-8800 '>)- 
x'fflt; r ®j(HALW5Sm) H' 5 *- K*» 
£!> it. 

4 MSX-AUDIO (YM8950) 

- % c, I* MSX ffl Ufli c, titzt&f- y 7 

■c, FM**«k pcm - f->-ry 5/^*0 

2 00/0 -fo 

FM 0 OPL (YM3526) t 

i 05 fc < PI C t> 0-rto tni:JniL-CAD 
PCM t: J: &-t>7>J y7WMi 
n-ci'ito 



a^-y-^x'y < 0 >t y frig 

Slit. MSX-AUDIO i:lit0 fc » 0 
ttyp^i- D-70@»(,flijnti' 
i-r*.c,,^-c'-y->7°y v^fflt:^*256 
K'M t> 0**4 /- 5 y 9 RAM V 

iii'f 



lit. 

j ^uropNAi=o>L\r J 

HT OPNA ©tif-Tt. C © IC li C. 
ixi'COf-'yy^U' t - A !£*>(> 
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03-B SSG^ifggB 
ADDRESS 



* <* 



®3-A OPNA <hUVXf?-y7 
000H 
OOFH 
OIFH 

02FH 



fm^s® 

(ch.1~ch.3) 



fm^ssc 

(ch.4~ch.6) 



r{pC,tlK*y7Tr* (HI 2. *1). 

it, WitfiSj I: lifiLsfcCD OPN * 5 2 #Ll*I 
un, *fti:OPN(:li*J£lTWj« 

ki'tio-Cto 

OPNA 01**6 1*** < 4007* a v 9, 

1. FM^iSSP 

2. SSG bB 

3. !I/aS 

4 . ADPCM $ 

fc^tSif (BI3). 
iUT. ^n^ncoi'-cisiBflLito 

1 FMhSoC 

FMffiSms i: ttfffc C OPM IS S0LFO 

m&l LR LI’, 

iaruit 

nirt. 

$22, LFO 

w - ftt LFO © ON/OFF t 

ftOK^frtfi'i-ro ^^0T3t'? 

!> >T'SU-^'S h n-vi/0^9- hi* 
£ 0±0 1' 7 > 3 1* ON 7 7 tlTt « JH j& 
fti*H 4 O J: 5 t: 8 Sit . 

$B4~B6 PMS, AMS, LR 

Ctttt, Kfters * 

LFO0L**0^'>°7^-^t't„ PMS * T t° 
yf'tS'Lv-i'a^'T'T'x, AMS * ? 
7>7°y • ti'Lv-i'a > • r* 

7°X, 






*.ft o 050UD, PMS li 8 fm, 
AMS (i 4 ^©rV’x^IfcSEt' * i to 

$60~6E 

wCDv^XiSrli, 

t -4 i"f H: 7 

® & ©f L tztf, 7 h 7 i:*r l < LFO 
©5 1 b, AMDfryryfa-Ft^v 
- S' a 7 )® ON/OFF 7 7 5 ft 

i Ltz „ 

2 SSG 

SSGgfllifiE*® OPN t t < C 3 £fgii 
h t ) i -e-Ao 

3 S 5 Atz££/a> 

y X’ASBU:^aBt' 6 o®*s I s*xV7 
A, xi 7 h* 7 A, S'S"-Ov, 7*4^7 |., 
*a, Dii'a-^, ®#«rmti t* f -r 
S it(H 3 -C).tti’#t l-CIi OPL©y 
$ir ©9 

X’A^it 7 tB/ 074 xVi^v-? 

Sc Eiriitci, %?A,b-t>7’9 y^Ltz 

JL-:Cic,y/AfiiiSi:*' 

y ifclifllrtt-rS't/i'LR 

0 - fev-^ m*-o it. 
ba>:/bbs;x* $10 

£ © w i/7, ft ** y x'At0 S' a 7 h w S' 
xnr.mz*) it. v? V ot'C, 5 if* 5 
thw*si:«eitj»», »*mt 
Jl^tttft&ttlStaK^ HilWtt 

h 7 *^'> 7°7 7 ^ti.'' 3 'C, c;* f 0 ® 
i I ClSSt STOfcVf ( 0 — 5 ) **# 
^0 ON 7 5 / 1 : Sf 0 , lUSco-Cl'S^ 
^■USsStSf '7 tCD^&fOr-tZ (- 

NfjhftS) ttSSrLi-r. 
uXAS-^/i/b'^u $11 

: 0 vs^xjf ii y x'A-t^^a 7 ©** y 

1 - 4 ?r|-Mi:a 5 ' h n-^ts*»s 

^v^ 7 ^-rto Hit' 7 h 

o**c, 5 i-r©6 1'7 h-r, «s >^^0 

»rtt**;tit. **-r- 47 . 25 dB ®3 
7 hn-*vj^*fcihit. 

UXAb^l/ $ 1 8 — 1 □ 

#y TTAmso^y a-A tLRft> 
*>©;!&* ~®vs>x*-nT<.' it. t' 
7 l- 0 i>f. 5 i fa*# y X' A W0«S'J© 7 
vt*-H— r, ±t , yl' 6 i'C ) 7 iiri ! 
$#*■■* J'**'© LR«J 0 fix 4 yfi: 



st-y it. 

Oi t) c:ftC, 0 V'S''x*(:fil£-fc 7 ht 
zzir.il), 60©y *a*b#©#i 
©'* 7 v x fc g * cfS^t KtJ' 

f & ifeitrt. 

4 ADPCM 

OPN A © li *•© FM Wig t 7 7°i; Sc (,' 
>f#6&**±Jf c>ftit. 
OPNAC li fl j£ © MSX-AUDIO t fiW 
©ti'fy >r«#g*tftsn?n-C(.’ito 



ADPCM iB 

it, iirttOPNAudffisnTi' 
5 t> 7 y S^©— ^rStADPCMjKoi' 
TUiHflLfcl’iJg.i.'ito 

ADPCM tii Adoptive- Differential PCM 
©«&f, ii£Stnb ntt'it^/y 7^0 
JEr^C, PCM®*»Jfitl'-pfcSi; 0 ^ 
ft. 

C 7 #C©fc *>'!), #iIPCM ti '5 0 IS 
#©«IW«rlB*H^IBfliU 4 HPltT. # 
■MU Jr t ©mEfcf s^/Haffeit L i 5 
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LtZ t>CD-C'-t (H10). 

#mt Sl#raPI**ir >7 !> y^u - h 

i’l ftD i-f 
(HU). 

i fcaeitt s ^i-s 

fc «* frtte* 1* * *W ft ** t ft “9 T •> . 
12k*y h*’£,16k'y h 
»a©-ty7°y yr4f-sj?-Fftetr»# 
ffltti'it (iai2). 

t^!i vr®m*«r±»ffc»tntf, u- 
>7°y z/ifv— h frit; < L, *>ok'-7hSc 
S’ti^sftttniiTfti ifti'biit't* 1 , * 

5*r<iUftSliE<6*t LTiettS-tfSfc 

«?>®y * y **fc < s/U'4 z fc eft i) i to 
t«S Itomtz (Di:#it,W; 
0* T ADPCM-r, Igat LTIi, W&<D& 

i'-f, /;<!*> 

frttKlfltStfJ: 5 tt S^rto 
i i t i t tt. &«Lfc*EE© 

pcm 

f#3»«»4r«HB-rx^>f X Lfc«EE«li. 
0i4© 1 5 ci^ntifc tjt-c'im* i o 

MottHR******^** r ffj©tE 

t'ft< ?A.©k'-y haii**fti't#ii 9 

tli?, 

:«i 5 ta-Cti'/y 
ADPCM-Ttc 
□PNA (D ADPCM 
OPNA t: tt±jCO J: ? C, ADPCM i: 
J: 6-t>y) y*W&*'1M9tiri'i+. 
i tz adpcm -cbo x t . *1* yt^/y 

/{-yt/unvtra-yr^fc^ty AfD 
tTtt+»ft*ifctt«»t'***A. tZ-C 
OPNA i: tt^-yf-A'ayif*.-*** 
tusijiiy^ey ©3> h 
f-vry *«*.* i 5 1: 

ft o -Cl' it (015) o 
Z © OPNA «y3V)B-7 
ii64K i tz U256K k' -y h DRAM k it C 
sU'M-^t'S, MJc'C DRAM %■ 8 (@, 
'o - ft256K •'M h* J -y->ry 




to 

MEM DATA : Tfl», t»MtyC7> 
•fe^*W«kft‘JSto 

REC : Tfl»fc#, ADPCM®JS«-#t«t 

v.', «y^*ycr-#«)»# 
a**W»6t:L*to 



iit. itz>z<D**!> tt-txT‘9 >ra 
n® gftfa V If i- Jtfli*. 
izib-c^, *#*0*hv-sM*y 



V ► n-*UifX92: ADDRESS[101H] 
37 D6 05 D4 D3 D2 D1 
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t i-c«5 ; t trs it. 



OPNA(7)SPOFF0*ft7'n -y *0 




r^~hr °j D ^ ^ 



ADPCM-*>:/'J >7+, D/A 3 >'<-9 LTV.'*(DT, -tf 
>7 , 'J>^«-fi-5^ttD/Aa>/<-^*'f,ai* (XfcT-Aetc) ? 
W77WSPOF. 



|7^-h/Xh7^7 Kt'* 



X?- hr KUXL/H : ADDRESS [ 102 H], 
[ 103 H] 

T(D®T, BANK t U 8 «D DRAM (D* -y 7 



• DRAM( 256 K/<< I-) 

□ > Y P -ZU U-i>X 9 2 (DRAM TYPE T" 0 ' 
4-tagLfct#, X?-F7KUXL/HB>S(DJ: 

?£*>/* to 



| D7 D6 D5 D4 D3 D2 D1 D0 ~j [d 
\ START ADDRESS (H) \/~ 



D6 D5 D4 D3 D2 D1 DO 
START ADDRESS (L) 



! ! 2 1 2° A8 A7 A6 A5 A4 A3 A2 A 



o o o o oj 



A8 A7 A6 A5 A4 A3 A2 A 



• ROM, DRAM ( 256 K/<-f l>) 
a > h a ->\,l*i>7.9 2 (DRAM TYPE X "1 ” 
&!93£Lfcfc#, 7,9-lT Ku-XL/H BifcDJ: 



(♦(DOl'/ix-^t-yKi, Xh 
•yTrKi'X (H) fclDLMiULT <A'#t>)o 



|D7’D6*D5*D4 D3 D2 D1 DO | |D7 D6 D5 D4 D3 D2 D1 DO | | 0 0 0 0 0 | 

\ START ADDRESS (H) ~\J START ADDRESS (L) \/~ / 



2 1 2° A8 A7 A6 A5 A4 A3 A2 A1 AO 



X h -y 7 V K UX L/H : ADDRESS [ 104 H] , 
[ 105 H] 

T(D 0 T, BANK itt 8 flS(D DRAM (D-t-y 



• DRAM ( 256 K/M I-) 
av|-n-/n^x ?2 (DRAM TYPE T ” 0 ” 
fctSSl/ii:#, XI-yTT'KU'XL/HttifcDJ: 
^C«C‘J4to 



07 D6 D5 D4 D3 D2 D1 DO D7 D6 D5 D4 D3 D2 D1 DO 



STOP ADDRESS (H] 



2 2 2‘ 2" A8 A7 A6 A5 A4 A3 A2 A1 AO A8 A7 A6 A5 A4 A3 A2 A1 AO 



y= 



CAS ADDRESS 






• ROM, DRAM( 256 K/<-f ► ) 

3 > h D -n>u i>X9 2 <D RAM TYPET ”1 ” 
fcKSLfci:#, Xh-yXy Kl^XL/HB 5 fe(DJ: 
•5 ICJ5C »J i -r„ 



jpri 



'D6*D5*D4 D3 D2 D1 DO | 


D7 D6 D5 D4 D3 D2 D1 DO 


rTTTT- 


STOP ADDRESS (H) 


STOP ADDRESS (L) 


/ 


2 Z 2 1 2° 


A8 A7 A6 A5 A4 A3 A2 A1 AO 


A8 A7 A6 A5 A4 A3 A2 A1 AO 


BANK 


CAS ADDRESS 


RAS ADDRESS 



1 ADPCM M%0) I 

$oo 



7 K^X$OOI iay h n-7ny^x*l', 
ADPCM CJ: (-t^ry > 

9'), £•)*, -fcX&fc'O 

SttaXl. n-yHito 
tySO : RESET 
a-sm* y tr-tm t lx adpcm 
r lj «r#satf 

REPEAT liOCLTfeHto 
tf>xh3 : SPOFF 
OPNA f- -y 7 °i: i£ 7 |-gB{iiyji£T t U 
SPOFF (xtf— # • *y) 

JbOiTo :0f7 

xts O.^O-tyx 0 !; v^+CJVSjtD/ 
A a y y<— * *> f. 0 C i£ ft ti 

i'i5$cBIIMrfttoTifcftu*6ft*t 
(017) o 

tfyM : REPEAT 
;;i: r l j frit * c t u J: y fl-SM 
^ey cd 0-7 KvxEw^^yiiL-cry 
txliltit. #*-&•* (#£) i:/p— 
& £ l **£ fif-fs t To 
e>xS5 : MEM DATA 
c £ ** r 1 j 0 t & OPNA *> t, fl-S M * 

y ^® 7 y^x* s nrggca: y It. 

tfvSB : REC 

££* ir lj 0 l $ OPNA 

y^o*sa** f ^r(iBt:ft*» it. 
e>xS7 : START 
r l j 0 t & ADPCM <0&&L/-t x 7 y V 
yfci&ait. 



$01 



IfvKO : ROM 

:0t'7 h«ttgM*y 

To 10lS^«yiLTROM(rr 
y-txL, 001 s DRAM L 

It. 

fc!\xM : RAM-TYPE 
DRAM 0* t T?f|g£ lit. 
tfySS : DA/AD 
:0f7hi !r lj0ll DAC-DAT v 
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($U£) V-r-Zkn-'S it D/A 3 > 
sf- 9 L *t« itz, :©t'^ 
*s 0 <t"0 SAMPLED y h ** 1 © fc & 

pcm cis ad^& (-y-^fy y?) 4rff 

I'ito 

tf>>S3 ; SAMPLE 
C®t*5- h «r 1 C Lfc«fjSt*& AD$ 
« (tyry >^) ***6# o it. 
tf'J/S6, 7 : L.R 
D/A£&S*x7;ffi^ (t-vry 
#) ©»**■■*:'**'*»£ lit. 

bi/X* $02-05 

x^r-h/xl»»rTKi«'X (018) 

+ >7“ !) -* !) 0fSJ«5:*' 

7)Vx0 Tft5f7) 
iJitcx^-Mroi>-c«0 ?r, xh-^T 0 
coi'-cii l t» 

\yV^ $06-07 

7°y T.'r-iv (019) 

AD, DA $^B#0-y->7° y h 5r 

bi/^^ $08 

ADPCM-DATA (020) 

7 =» > tf a ■ - *ffl» T *k g COPN 

A t:*|*5#ifcp/A xyst-fi&m 
DA/AD$«fc ft ?«£•}:, 

$09 — 0A 

DELTA-N (021) 

ADPCMr 0 ^£j£i$c, ^y-r y 

> ^IB frttlH' t S 7.* so <D\m kH- 1 1 t „ 

:0i«t^/y >mk&p&&mn-c 
mt£&V'?i-cm£.£fT5 ui:«iLi 

to 

bi/X£ $0B 

ENVELOP (022) 

ADPCM #*£■*»* Ov"** a V h 

bi/X^ $0C— OD 

y 5 y h 7 K v X (023) 
y 5 7 h 7 Kvx^fiJjgLfcii 0#Hfe^ 
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e o i -f, 

$0E 

DAC-DATA (024) 

DA fc 

to 

$0F 

PCM-DATA (025) 

ad Mzyttit-rkr-z «r»iflt 

Sv^XiJrfto 

tit's i-a-A, 

bs;;*£ $io 

FLAG-CONTROL (026) 



nt'.7)4, 3, 2 li r 1 j, t©m(i r 0j 
fc ft 0 i t o 
fcf’7 S 0 : 

wZ»* rij *4-?- A0®jft 

i:fcH«i:^t^-A077r5r r 0j c 
L 4 to 
\±"j s i 

t'x ho fcISIL <, ::4 ir ij 0 tJ, 

^4v-B0|)l(^:iSI»:^4-7-B0 

77^ r 0 j i: L4 to 

t^SE : EOSV^ 

; c* ir l j©t !■ EOS 7 vifk^x? 
L-C r Ojt:L4toEOS7 7^li ADPCM 
-ty?') 

y-v/5't h »t, ad ft £ 

^st?7m. 



tf'7S3 : BRDYV^^ 

r i j© t & adpcm d-77 0 '; yy/teft., 

$*SM*1) 07 ^-txS5^7 7i5’'ft r 0 Jt: 

L4 to 

ti\yS4 : ZERO 
r 1 j-r ADPCM 

r 0jlzLito 

e>7S7 : RESET 
;0t'-7b^ r lj tzixr-fitrt$ 
atf t t'x h o ** 4 4-riiiwasn, i 

/*, f^T0X7-^x7 77(r r 0j t: 

Li to 

Xx— S^bi/T.? 

Xx-^xvi7x^li2o* D, £n£' 
nr Kv'XV'S?x**M*ffit;: t i:i !> 
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X7--9XV 1 




STATUS-I(READ) 




y-yjv>'7^>mvoyF- s 5'(y : 5'j 

SOUND PACK 128 

7I-— 7V7I-5/K ASP-9801 9.800R 



**ffi*4t (027) 

Xx-^X-1(A0=0) 

tf'7S0~l : 

*4^— A, B0*-^-7b-77^ 

rt. 

e^S7 : BUSY 

OPNA a t t'-*S?(*)g|!u'V'x*^n- 

Kt4*+ r l j I zU tj i t„ 

3.x— £X-2(A0=1) 

B'7S0~1 : *7tV-3x? 
^r-^70 tin: <, *>5-*&cO;M 

•7-©/w»©7 7^'-C'to 

t'7SE : EOS 

ADPCM t>7J>^i'»7Lfc 
fcS, AD/DA !) V*^ 

A**fciiLfcfc » rjj doit, 
B'7K3 : BRDY 

ADPCM tv 7“ 9 2 r- 

ttftQ&mtfifrr Ltz 1 1, i tz, Ttso 
■ty 7^f h/y-K-tr 17'-* ftartsMt* 
*7Lfcfc&C r lj 
tf'7 S 4 : ZERO 

ADPCM tV7°y Vt'tf, -tV7°y VT' 
t S r 1 J i:4Ht. 
tfu/S 5 : PCM-BUSY 
ADPCM tVT’y 777£'/£ c P r l ji:4 

Oito 

tr>7S7 : BUSY 

7'-*4’W'x*t:n-K+ r 1 j U4c 
lit (xf— 1 clsll'). 

W±* J FA/MA(0t7 v KttteOlKSr 
to fflaL/:t>7yv^ttffii:SiLf 
t— r'/f t 7 t-7w-3-— — 7 tt 
t77°y V^fflCD®^*Bt£IM&i:o<t 
i li 7. 



ri 7V<7V, — tV — tV, S' t V't S' t 
S' t — Vj ttV7°y vt'* ? !iitff LTI'T, 
'fyav'pfv/y v^- vv-fc-y-'ftt' 
t-vT 0 '; vmL4,7i'5j(>^i’t,i. 

i'it. * KtttotttzK)?:? * y i©* f , 

d <0 1 V 7° y V 7'ffl CD [SOUND PACK 
128 ] rto 

:<9CD cii, tfry^ h 7 V -47 k'* 
■f t y V, ¥3?—, )’7 A, t — tXl>7 

co ^ & t* co fe t & « t? © # an 28 ' * y ^ - 

/av«i?ntitt. Mfei’2^7 
^-7'iit'«^?n -ci'S cor, *&*&*> 
taciO, 1 hco7 ft c,fBj 
¥i:YJCLk'it. 

it«. 7tl&7t77 D 

yv/Ji£i ! *it)iti ! , ZCO-tVT’yv 
^i*# ottiHM&ns u^kvw 
t-CfeSIU'tcOt't. i L-C^SSrt'O 
< Cli, /y^XVft 

ersciBicttatttRo it a. if.-, 

A^TUi 7 :u#i^ni 

to-r().CD7”w^t-c0 7'f V7 7 M- 



^tv7 s y vT'tnur, * >r s v^vrn 
«:u«c</'f 6 t. n, 

^(:-$<o^fto-tv7 e y i to 

«fftLt0^ytv7 e y v^tscorii 
&<, #*coflrfc«ffi0Wt;& 

L'-CI^tt. 

fcfcitf, 'M^y v, 
ofcfifc-cffiA&fct-ci' ttijr, -E-nr, 
fc 5*-tx h 7iSf#**^yavtc,!S<a 
T< scorto *Atx*7 K7 A®^r 0 
&^bt-CU, K 7 a • 'tit—y {> 

It. tT7/CO#cOfflA-g'tt^tV7 , y 
v^ttttf, Vi- 

'**' h&iT0«SH>*L«>4 fci'5 hltr 

t. 

t— v/x • 
t 7 h ft if k *»KM:JKIikS4vCi>4t 

or, +4K* L J: 5 o 
t'coWfci'coJ: 7 i:«7*‘ti'7 d ff, 
i' < t.r{>^L*sco-c', -ns 

*ftft {, vy7*-t::ftfti to 
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ADPCM Record & Play Back 



C tut OPNA® ADPCM m #14-116-0 
^7 A-r-fo PC-8801/ 
FA/MA ft ft © 4£36^- P v 9 C U , 
ADPCM 3 V F *» -*+ 4 fc ft® 
frXr-Mi' + 

>7 >l*:on PCM, PCM PLAY, 
PCM RECORD, PCM LOAD, PCM 
SAVE & t'0Xf - h > V F PCM 

J 7P7^A©«Wgi«S 

1 PCM 

ADPCMMtEOttJWIStS fr ft 5 tz * © X 

f— Mvb-r-r. t lt 40 

©»**»* l 4 +. Stt, 

D-vtOwu-f, lirt-Ktflfhlt. 
#ft: 0*‘f,255ir©fi-r, ADPCM 
#£lf$©ffl*»'''«/i'$rt9:£L Jt, 
£{i : 1 ** C, 3 9, AD 

PCMW£l$© lr ft * f- -V > * 
^frffcjgLito 1-RC6), 2- 
L (£), 3-L+R Cfc&) cm* 
JWf. 

-9-^7’^v'- f : -y->7°y F * 

i to «^-T5«« 4 -(4 
KHz), 8 - ( 8 KHz) , 16- (16KHz) 
®3«iirto 

K : li*>© BASIC xr-M 
> F CJtlT ADPCM + >7°y 
yy, 977 V'sV-C 

nr 

o-T7 



K^-Kc^c *> it. 

2 PCM RECORD 

ADPCM i:Ut>t!< (t'a-f 

-i 's?) — 

* itii-twmsi), *hn$m© 2 as-rt o 

;:®^x;<-*±© r^giij iio.i#me 
■rffissn, r ^msi|jii-t9vK7<^y 

(-y->7°y v^fflc opna i:^»sn 

/* D-RAM) ©5tsI7 KwxSr 0#tLt 

fflUMBarfc t c ^.c-y-vry 

^ot< fcfc*.l£-f 

9 v hn -t y ©si *■ c. io#m %■ v' 3 — 7* t 

r 0, lOOj ZWcfcli-to 

3 PCM PLAY 

PCM RECORD imTt^/yy/ 
snt-f-^wtuto 
*li RECORD t |5]C < 2 olT* 

4 PCM SAVE 

OPNA ©D- V > K -t y ©t*— * x" 
^7^-tLit. /«?;«— *tt7 7 
MfeBfgi], ^TB#IB]©3 0-C't„ 
*?-7#M©iti*«PCM RECO 
RD cisHnr-n 

5 PCM LOAD 

PCM SAVE i:io T -t-T'S titrx"- 

* opna ©-t yvK^^y^o- 

KL-C&ito 77^^, 

ffiteS#ti]© 2 o-T, £ixFft©En4UiPC 

M RECORD C|S]L"rfo 



1000 ’- 
1010 ’ 

1020 * 

1030 ’ 

1040 ’- 
1050 WIDTH 80,25 
1060 PRINT 

1070 PRINT” 1. Record 

1080 PRINT” 2. Play 

1090 PRINT” 3. Save 

1100 PRINT” 4. load 

1110 PRINT 

1120 INPUT ” select No. ”,X 
1130 IF X<1 OR X>4 GOTO 1060 
1140 ’ 

1150 ON X G0SUB *REC,*PLAY,*SAV,#L0D 
1160 GOTO 1050 

1170 ’ 

1180 ’ Record 

H90 ’ 

1200 *REC 
1210 PRINT: PRINT 

1220 INPUT ” hit [ RETURN ] ”,X$ 

1230 PRINT ” Now Recording — ” 
1240 PCM 255,3,16,0 
1250 PCM RECORD 0,16 
1260 PRINT:” Rec End ” 

1270 G0SUB "PLAY 
1280 RETURN 

1290 ’ 

1300 * Play back 

1310 ’ 

1320 *PLAY 

1330 PRINT :PRINT ” Now Playing ” 

1340 PCM 255,3,16 
1350 PCM PLAY 0,160 
1360 RETURN 

1370 ’ 

1380 ’ Save 

1390 ’ 

1400 *SAV 
1410 FILES 
1420 PRINT 

1430 INPUT ’’Input SAVE filename ”,X$ 
1440 IF X$=”” THEN RETURN 
1450 PCM SAVE X$, 0,160 
1460 RETURN 

1470 ’ 

1480 ’ Load 

1490 ’ 

1500 »L0D 
1510 FILES 
1520 PRINT 

1530 INPUT ’’Input LOAD filename ”,X$ 
1540 IF X$=”” THEN RETURN 
1550 PCM LOAD X$,0 
1560 RETURN 



Sec. 3 




r Z<D' 77im Z-ti 
m-LtWj t cM-rfcfcn-ci’S 
fcfcO, PC-8801FA/MA y 
i:*n-ri' 5 w i\tt'Ccm(om-cm«ni 
i LtZo Li'L, r FM 6 W + ) X'a 6 Wj 
ti'5C t Cfc.°y t &Ti'4 Al*4>4ci'tt 
ttto i® r FMWigjfci'5M*. SFC 

Ifci ktt«Sltft£, -ttMfc©**? 

*5i’*.UT, FMoTi’5 

©* f *S&*? $g*>, yy-tiM-f&fc' 

-ffto T 3 y*> 

£ y y *t 4 *©*>&* ? 

t *> A «>£ ©II® fcft-olTi' 
in* 5. 

Kf, 3-0FA/MA 4- J: !)j9l5±r, 
r FMf®j Cot't'pJ L < JSDiL'C* 
fct’kii’it o 4-n*, r w t um-c** 4 
®*>?j Lfi' < :ii:L 

i L 4 5o 

soi/<a» 

Wli, £*©««!: i^>-c«£ *> it. 

£ ©««J**£fl* frfefco -CW©MJHI CfiJ 

wt L-cB»3ft4t. r 

3-xto^ - *** -Oiktrom k L 
tbl L 4 5o K«r lit < fc. 3£* f fgftT, 
£MSrffi®JStito 

® e otto* s -rttfr u: e i» fc *> 

®3S?rffSlTi’4#fllf- i:iot, t'ft 

1 1' 5 ^ fctt* f , :Wf0 3o®S 



*-r*s, [**s -wfe-*?] lor 

-To Hl-rii, ift^OA^Oiro-Cti'S, 

±4r&lfc&^®liTC3*c 0 -ci'3 4 
to ;n?n»wti'i'i-ro -©i&oii i 
Sc* s l WSJ CM®* 5 *<flf0*s i*ft 4 

*>4to :©: k*JBalMkfc*tf, H*(^ 

*50 ti’SiMitm*-*-. Hi-nitt 
It 1 ?>JSJ ClHftOfl Hz. H 2 !*«« 
**3H«tor3 Hz fciOfcltft. 

*<®***i'« £*©«*»* 
»<&0 4t. fctJLur, ^tv©**# 
i£© r 7 J ©#li440Hz-t', ZC,£l*?tt 
-y^' r y j(D^U880Hz I Ztt 0 it. 

0 3 to }& 

0-#at’U« (lU) t-#fi'U6 
<») ©£*J6IBfci’i'4t. ««!*#© 
AS 3**1, SIS*** Si- 1* 5 a*#* 1 * 

&<4!>4to :©M A0©i4 7* f B 

■t i«0#s0****si'0-r, «#s* ? 
A3<, -34 0, 

to W0A3 3CI4, Vxh^ty, r'y 
(dB)t 

w© 3 n^©4’t'#©ft$ fi^issc-r* 
3ft, *& 3 «««*■, ^LTWOtf'fy 
h t 

Hit ift^ltrtn^. yy-t-y-'f-ffc 
* C 4 < aj-C < « fc ©t*. [JEStt • Zft 
«•«*!*] (0 4) ©3o cAJSflt 5:t 
* j rs>4to ttXfi*. «©» 

7*-A) 

^o-ci'5iit'i«.i'^* ? ai4to **, * 
kM&'C'* 0, t-<f©W®**t &S© 
a*. *?*.--/' (t 

4y» -ft. «C6ft«ci'i tu. Ski' 

*fc c©*6**i'H»**6fr6ft«0-trt. 

0 5ri*2o©ji7iE&®* J * 0 4 to 
xi&S A0«**C, A©2^®®StT' 



2 «•© i (t#> ©tfi© b ©»»*j£t 
t (3*ti), C©4 5 ft*»**f> 4 
to ;©tt»lt, 

-C 3 fi ' 4 to :©®i:J(.i:, ACM 
L T JR i&a* 1 3 ft 4 ft 5 fff©tt» ?f Jn x. T 

I'wur, r/ieAkHA«ca-t> 4 to 

w© J: 7 A ©7C©j£^ %•**?& 

B © i 7 (clttiti L -c, JU?£3S:0teSc 
©iOfrfgflf (<»'— KPiStfc 
l'i>4t) t^A-fi'lto ffltfirtfOi' 
< o^Oia^fetCJ: 

t-fto 

FMtStB 

r/ftrom^jnstter. FMtai^ 

SA *IS, PCM «■ t fex? 

ftTi'S ttrirn^c#**ft-Ci'4 t* J , 

^ ©*«!*. t'0t 7 4Jt(.'***S©t'L 

4 5? 4 fc. r 5 L Tfe* ft *^© Wi® 

* J * 4 ©f L 4 7 ? 

ift 60 «-#*tt. f?rMtU(* 
* J ?4?'4cri>'C4 3 '0, 

4 to icotztt), y-t-i 4#Jta©ay 
-tt f c-w^/.-ftii^wig^^aiAt'M 
oct'ito 

PC-8801FA/MA C It, xV^W^W 
fifeWSt C**S FM 

*W«r»ttl-Ci'4t. FM Wig^^lS L 
Tl’6#'y-fet>ft f ©ftaai^tLT, -V 
-*s'(D7'?*n> - yy-tf^f-f tdx-7j 
y y - x'*f* y 4 to L t' L PC-8801FA/ 
MA It, i<D r DX-7j t4o7;<®CW 
* J fH4 ti'7*lt-rii*y 4tA/ ® IS 
Wigw^^MoTi'i, o 4 yw^-^yai 
t L < ^* s ®C-r*5 tl^ftlt-fto 



FM^iKOFM t I' 5 0 U, FREQU 
ENCY MODULATION©?!*^© if, 
»a**ilfci’5£t«r*L-Ci’*-r. z 
htt«¥i:lM!t* t, TCO^C, *s«ij 

©#****, 7C0WC 

; t-rt. fctiiif, &bih 

-rr^ h0A* } ^o-Ci,'5 t Lite 
t:£iI©A*Ufc-C, £07^ h©A£ < t<* 
ofcRito 

t* i k<J)7» l'©A©^li^i.'^(:$ 

6 0, ^* ? B5 < & 0 xfx /©>»(:£ 0 i 

to ^n* J ^®&$p©fgf^/j;)gii-r'to 
0 7 IT (.'it. It A, 08t 

a 2 At: < tc^n-ri'itct', iot 

T©0(i, j&0EftE'60lI3I*fc^lTi.' 
St©!', DX- 

7 0''°t/i^i: (:*A*4iTt.'T, FMWiI 
©f±iffi*0£* t & * t> 0fto 

FM WiS-rfi^-r 0 7 (£Pifc5 D4ft 
•§-) fcWiSC LT, ($|^t 

zm*r) t:i^TifH¥0 it. tt*-^, 

< t <* ItiZTw h0Alix;i:4;5 0 
7t* 0, < t CSAii^-v 0 7?f^{k? 

t-rto 

FM^il-Cli, ? I>lit'07^ l'0A J P 

< t<'SA0- t&t't-y'-fi t if A. TV 

Ito 

fiTt'*©!*, lo0ffei:ittL-c, 
u-*a*4o*s i ti’5S£i*t't. £© 
!^>-7/vi8 
JMW'fvtt (£$£}&) -ct' 

ito i a* l, z<D*H 

Ub?zlc-£I), 

- l* t nNI£i:& 0 ito t'7X0Si|65^ 

tt0®£n4i5^lS*l4f :j P^®^0 

FM^*M#«tt2.^fe-rto 

iiA-* ? , jEstuii-t-f vmnmzm' 
\1 ROM i:!S1t£ ttT i’T, 

ii:t4:UWt ifc, :0i* 
ffitOxE’-Kci 0, ftT < 6tM 
©JUifcSc (tvt) A^fcO^gfr&aT 
I'it. £ LX, £ © x if — Ktav )■ b 
— t 5 0A f PG (Phase Generator) L if 
ifnuofto jf-tytHJ'*^ 
{) E ftEVS'J© i o 7: < So tzrn % te Lx 
I'iti*, HEtO^COtto HUEt'O' 




®t{>i®7ffl&?rL-ca?|(:^S (£M) 
LiUtUot, /a¥y®^» 
4C**1*6n6 0t't. £©»** (*» 
A*) ©v^ci^TS i 3"i 
L, fi0w^>4 ! ii ! Jt, ®0I*C 
<*fttS0t'. 10 **4* 
E •> , $ <t>i:v'*A'* I _bb*S t?£0-y-4 
>m' i i uta*tr 



oA-^c&O, >M *i:j£i'l 5(ffi:|, 

4 0 it. 

FMAfSiT'l*, PG* f #(:-S0HB8t' 
t^f >&$rM*/itlTi'4 0T', JH#j'f£a 5 
-£t:#&l, jE*4*e4»-» To it. 
7io/- (iai *, 

#S0^^5*»4i'6lit'to ifc, -t 
^^i-GJfty7t 21ffi0i^v 
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Kblt-Clit) D iit/i. 

v-*t>*-vy 7 t>, 3 E«ti’iifiaii: t> 

ort*'?., a. v— ^ av- 

-*i:**Hr1-s w it. :« 

**7 • 7 4 - K'f 9 <?■ fc l> l>, FM #iir 
#W£ 4 BR®, «> 5 lo 0 *liS*i?c 
y i to 

t 4 (£P$t 4 ) itCioT, X*»C. 

to ^<x* J FM#?Srto 








filers, 

| f < W^ 7 b^U«)S./ 1 

NEC *• f. FA/MA t |5]l#i:ffiS tltz 5 
h r Instant Musicj it =t 
U'o/jtot', «fiottey i:t<*i:W 
** j rs-c Li i’i-r. 

**t«, MA,r?®c*t l-t, 

Ltfj toft. mz-Ci, 4077 h* 

aVJfi-^04f~sK-K, ^7x©t' 
t. 6 ^rfcfl^Wjr S 4 ± 5 c ft O T I ■ ’ 
it. *«Ffc?ci'U 9*Afc-v9x-rtK 

9 xr*i:£fc**rSit. ut, **, 
t>*tesi, ■B±r-» 9 xtr«frt's 

4 Of. St#H»rfc-B*««:b**iit. 

r t *’ la , 3 © r Instant Musicj * ? h ti 
It 3 ^tfa-?l:oK 0 j®ii,t *0 



Snlfcfe iofc< I>4fi:, g#0!S14*** 
#**** 11*4 fci' 5 fc 

wrt. 

| «rUU 3 :/t?A— *• 1 
1 -zl-VjO 1 

r Instant Musicj It PC-8801FA/MA <0 
'* 7 - 7 * 7° L fc flftlfigi * 7 » cttffl l 
-c^Ltj-c t* r r& it. it*, ^iro 
PC-8800 ^ y Tt'iAi: It t 
7 vK • 

4 t FA/MA i:Sfe%A’« 
#* J ^L»ito <tit©MIDI 

ft • 7 h i:Jt 

77 h7*rifwr****SMSt: 

*L»it. 

PC-8801FA/MA U li FMfi'6 o, 

SSG#**3o, y^A**»6o©ttiS«r» 

O -Cl' 4 or. 



it.rt**c,, FA/MA J-- -y-'-0#ii 
■ti' £> , r Instant Musicj L A r l ' tz t* 

*fc I’t&i'ito 

tit *HH:«J|U:*frrS4-»^xt' 

fco-C^-COtSfrSrLT^i L i 5 / 

! * 3 i^An«fc'^r I 

1 3 §U«>S | 

manrxn, ri *^c 7 p .xtr-tn 

i.a*yt» h •*'*>*’fftfc&t,±* t 

y r Instant Musicj ORHiA*&3R3 ft, L 

urc. < t 4 tt-^w/oi^tei y 
it. *sgo«tAeo*^***-7^r 
tfiit. :c*-yfl'0^|iSr J f-iK- 
KO^-i:t 4 t -* 7 xi:t 4 * ,; 5 ?*$] 
t. 

tORSt ESC 4 r-r*^$*x. 7 -a- 
^-**c,Mt4t«fi:*g§nito 
•?7xuit 2o0*t v* 1 * y 



30 



£t„ 

■c, #') 'yrixmtommzft'.'i-to 

| *tlif-7V>^ J 

n t" ©® y b n ** •; x'a i h , 
h, £ff4'* 

i^£T, r x-?/ wniifsr5rSL-Ci’4 
©*>&? j tS^nj^xYto @ffi_ti: 
#, R t ii v y>^UiJ y— 0)7’ a 
y y © J: 5 4 <> O ** *> t, t> c, gj®± i : ffc c, 
IfoTi’S, t - 

r Instant Musicj t'©‘B ?fo Z ? ~C 
t, S ©0®** r Instant Musicj 
0*l»tt0i:t. 

ih«c6, It {> **«HU:* < S 
£ to £ tz r Instant Musicj l£, 3>lfju 

**«#l?fi'J: 5 i:*1LT < nit „ 
s«i**-#®*ifSfci'*.£t. 

vtfi— y • 

y? h ti'o-C Li oT fejasrii* 0 i 
■£Ato. 

it U, #*jh tbXki l£ 5o 0ffi© 
£_t®xy — t/x|'y7°A'fy?-{:;*- 
'Sfrlctsi, ■?$ XCD&tffi >& ? ') y y 

tJti %m i Li'), t> 5-*yy y?t 
S tiR#*q5Bfl&S<x£t» *©&**>£> 
i£4>*'0(t&£ 

0, WUMit'bt'CyTii 46 c ttt* 
0£-tAo 0®©Ti:|£, 
ft, t©Ti:lt<#**3loao-C*!> it, 
©**’,> a-Aft. 5 4 
^-H*******:*^* it, 
LTl'47*n •^tfei^-Sn-O.'SO 
*\ t'©'>°- !•©#*■;&*, ttr.bt'*)i 
t„ '<-©fe**£i*s®f|f*?fii.'l£t'#* { 
AS<?cy£t„ *-y^4rift**L, yy 
y y L 0 £ t„ 1 

t &l£li**©^-4’'J' 
8<l«t<!li-AtTlM, li*>©^'° 
- h l£»l 1 £ t A„ t*V i - a • ^-©£ 
i:Hfti { 3o*!)£ti ! , Sftlityy- 
7'©«jy#i-r, p**t ©*»©«*©# 
«, a A' t 1 1 y y-:t_t, v/' t i t y 

y-fTCfc 0 £ to 2*yy-:/®3l* ? 



ft 0 £ t „ *> 2 t 9 Z-y'tlt, 

Bfi#, #0>f y'-'StfWb 0 £ t©-r,fe^ 

4flffe«rKt; t**f!> £to 
oriiry^fto 0ffi®;fci:i:SH''f 
-***y£to :Wfy^^-t't„ S? 

?>**»»< £t„ 

^©t>t>0iji& fcm®T©*«r* 
0t'HWt'»£t.»« 
W^fi:ry!K^i:Si4: 

^©t", 4 y-;y"fit Ci:oi'i6£t= 

| ge«ss.r*L/=fe5 [ 

r ®i£, rv^s’im'/j u<i' 
£>n-Ci'£to *'*»'«-*, K 7 

A©A*iiSr*f»-c'tttt<., w#t4*su 
£ I) fS] LT y nr'/f T* k t ffi® 4 y — -^ 

4 fco-rt. i zTrm&&%*.T* 

4:icL£Li5. #fe4r#*.fci'h» 
•>y . a> h u-*- • *'-y yxi:* — yyu 
4r t> -3 Ti^yy yyi£t. Ut, HI 

®©-#±©/t-3.-v '<-i:i^ £t t, 

¥*2©J ? t:±(:y-i-* f S^$n£ 

to kz<o r t9>\ f j tilt, y y-yy 
ts t¥*3©ii®* J ^?<x£to ££ 
■c'li, fe^®^fe* f Ao-ct.'£to trr/ 
E^-xit'©^SA'tt 
flii < , ^ J f>'t«'©#i Ao-Ci'-r, + 

fl-«:»l&ac) { * , t'S£to £ A, *e#JU 

^0 UFO, A, w— f-flfft t' {> ft *) i t 

©r, tt^ 0 A'Ut'l£?C<, 

fe*&tf*ffitfc i’5*L*#i*D £ t. 
I © +*•?,£ v • t mtf n - y Ay «r »)*• 

l, y y y ytntiT, 

•ci'£t. :©i5i:u, 

n(jr, **?c y*^©t— ?y>y>f,$6 
Mt f!,, its its, ints itciiw 

*©*L*0*y©'>Li: L*‘tr £-t 

a/ jfctty<Aft. 

a >tzt>o 

-Cl’S £t t?*4©BI*'S^S*i£t. 
^ i-na©*?, «x, yx*A^f-yv, 
y yrA®#fi4-i^is!) £ to yy.'ACD^©* 

< y t'Arga^a-ft'Ci.'i t :^ci-y 
,n5rt>oti.'*, yy yy^LtAJ t, 
y x'A£**£'fc y £ to i£«i:yy y yt 
st, 6^iy^«i'(U-c^£t. sc 
f, yx'A%- r n -y y 2 j i:LTS£ Li 




3fK4 UXA/<y->*SiiS® 



5 o ^ UTtV^^^La^CLT, ') t 
A®^*^Al!6?)(:Lt:L£ ilf, #^3© 
f-7yyyt, JjE.ifctC'''— Kb >y y 
t:ftyU£i'£ LA*„ 

r nisi=g^«A*-r5 J 

ST, i’£i'£#ff0A*Trto ss*> 
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C > *** y h 0 t#0 L » S i: 

^Sfcit-rto 

^ia,-07r-f^?r^t, ?*5® 
ai^JfiJt. :cf, b-K, -t 
B-KC7-1- 

**JZk 

r Instant Musicj I: \ifo ® *• L *, # 

ii'attA^-n'Jto 

of^, y a'a & if ® 4 y 
-sn:a£i’®ir*tf. tni'pi 
-t^ftfcATjts ti'5*iJ(.tnit. 

t: fsr t i i > t ; a t: A* 1 4 #i£ «> ft 
oat* 1 , mm, i'CUjtco^'pi-rr) 

seati' < nmm&'C&iwt'.'-ci 

X 1 o 

WftfcA^tfcifcflfriSc;, *-V»* 
®j*>Lit, ?^L'CK2t/c&. * 

to * ci'ftSSrjfcaT^y yy Litfc, 
?07 y y^LA’fiSt: ; t^0t'B ^4' 
#»)Lito :0J:5i:Ulffo^i 
L -Ci’S it**, «■*»:? fcOWfcfc©*' 
h Vikty-afttil Z t t> to *> i t A. 
HZ, 37hn-A.^^yf04f|0 

UiUtS^lI, 2{@, 3ilt**‘ 
n-ci'-c, K-ristnif, i sfo/' 
W*'ttft<, -*i:2#, 3 at A7j L T 
IttS©' C*. f-IHsM**'* d 
i: t OK ft, 

tai:»0fft *I=#0*«F, t»** 
Lti'Slt. iOJ: 5 ULTA*Lti' 
< 0ft*», • Kb- • */f 7 f 

0«ffli:i»), -*i:fc<$A,0fff?rA 

fitzz L t>r$ it o Wt?0ft$0pBi5 




¥*5 



it yy -;7 ifci it, mzwitzii 
ft »**lfc*»©fc wAif 
^ratwi t©-t\ 

it. f^SSi’bi^KTi r A'<-' 
fci', ;n<(,i'0fi5W5j ttifcHS 

trsitfva y jttor, «***£•*>&*■ 

-^ty ti'5 - i-tAo tit© 

1 5 i:^*np ?«»*»*-, ftSfrlHH 
t 4 v f -y h 1 1' 3 , si©* < U I i 7 It 
M4‘^ft5nito 

| *»*'6A*Ur*<J:5 [ 

4*t'0UWt < t {> 

a fit?*, ti'5#i£-rt. tt, :n 
tit ACIt dA&, 

=P*?ci0U:*«-'/ 

to 

:077 t 

d IU7ltjio-Ci'ito 

K b — 07 — j.— 0 r PitchGuidej f a 

*S©ife£0:£&?r3Itf * t« ::f, 
r Freej Kitfri: Usf 

4 Ufcfe&?ttti:iK#?tiit„ r Scale 
ruler j £ on Ut 5 t, HffiOfett C i:iS 
0^t7^7r-<7 h ts?4 ! i^?ni 

to 

dftlt x ■7 r — n>, VXu, IfS, *y 
^-•t0^-trto ddt, fti'Kvh* 1 

t©t, «*4#B(r«*t4:b*»fi 
it, e»raau*ffirA 

* L T t'fc Att & t: S fl-©{£o fc y Bf4 
ti'Shurt, it;, m 

0 £»*«« 

Bach's Joy 

35* 0 ld=fc*iS&A-y A©0 y$-$>-eto 
Mountain King 

V'J-Odi ® 

7\s'jvu 

The Entertainer 

BS® ®x-7Vy^ 

Home On The Range 

7*'JiimwD r m>tot>m j 



# «t» i: a - K * ? iii®_iiSP0 j« - C 

#75? ft i to znt, b— F iilf i'Cit 
bt'otLii'ito mmirM.ttDAjjir 
li?7 •> y ?<Dt — 77 F ^ if 

to crtCl#toA*L-Ci'< 

0- rti‘C., r-gttbftittr- 

AiiLJto 

ito xhy cmm, ‘ZMii 

t-7xi7^4 ! ^iit. ifc, & 

7jx 

«?t«:*#xif-K<r*Htfur. *» 

Wit-tT, h yffimiz* Ht -rt), 

i titsiwmm-c, i tzwig, y ai* k 1-5 

Alt ?m: y < /'?i'o 

r ^9J7-y^i:K7A*tA60?j i*.\& 
I'-rL^i', i## itA j t , rn* f 7t 
uyj'lu^tsofto 

fMLA*®fcli**0Ai:]8 
i’Tt c,x.A-li7* f Ot L*»C*Li'fc© 

tto 

% ;r, pc-88oifa/ma 0^fT*> c, 7 

4 > • TV h L-Ct-t-y h • ry^r.mut 

L-c»#tnijri'i'©-rto ^ 5 tmt 

1- o-a, ifc-Tfc, 

5 c t* { -r? ito 

C01?i:, ftc-Ti «¥«:#*»« L 

tj* C t * J 1T H®4 ! r Instant Musicj &0 

rto 

Let’s Enjoy Music / 



Kusa Keiba 

^TA^-0 0TU>27ffl 

Troika 

□f7ps^0 r SPT*j 
Les Champs-Elysees 
v v y v > r rsi u * tir i \£>, 

r tefe£/T>tf'Jtfj 

-&0l5A'C=fe-tW'C, ^^>i;g>t?7d:yT 
>ik tUytlUAMR+ffio 
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PART 2 1 M s 1 a mjmvj-/ 

Hn i v -A. / fa-ma-av 



mm m-. 



FA/MACM&aTC-K 

Sec.l FA MA0BASIC 

Sec.2PCM*®X7»-r , J>?2/X7 ; A r VOICE MEMO 88 j 

PART 2 jC IS FA/M A BASIC fflffiat- -- - -- -- --- _, -• 

o r sr r fis'i if ' k ‘ i "j, fa/m a rasa <* nis %' 

~ t-P2 X . t — K©m 

pcm h£ basic Mcio □> hiii-iu#' 

ST'V-T U yVzs'x^n r VOICE MEMO 88j 




1. FA/M A0> 
BASIC 




FA/MA Otlciot, /<-ytAa 
t l -C 0 r > S' ^ 
if * l /„* PC-8800 y y - X 0 fflja? L A’ «t 5 
i: FA -Hi, FM #«*■ y 7° YM2608f:*t 
SSttih^v nfttt* f iftfl:3ft, MAf 
U, CftCflpiTB^fg^sa^XdiHL? 
titZo 1-Vy KttflgCR L tit FA/MA 1 
Oii0ttat'{>, *Xy a >o)Vi> Ktf 
- K H ftlJT FA/MA t [5]l'«&£ 

:0StMi:ttoT, BASIC 0t£di 
2o0t-K^4f J:ti: 
SR T'l£363ft/.:*-K'*iS»* 
-Ft, ^®0 5r*£»t- K 2 fc i'5» 

K 2 0*££-c li, FM 6 W, 
SSG ffif?; 3 #, y XA^i® 6 -g, ADPCM 

#«l*«r7yH:58»rs, xy-tyh-r 

§ 5 tfe«t I> 62®*“ 0 12710 1: 4 -o 4 0 
^/'L, WiS^-Kc J^ tISJP^cXw 
4-T& 5Wi:iiSd®* f *o-c, 5-mi£m2 
ftfc#**-r#5T'tt, FMW)I6W, y 

X a #flg 6 #, ADPCM #i® 1 « It |s]K5f i: 
SSG^®3^li«x./j: 



i fc. i£3S*- K 2 li B *tt BASIC * J 
ffiffl-fS-f, teSg^e- K 1 -TliNEWCMD 
t'-f CcfeSg-r^ 4I>0* J , i£5g*-K2 
T'li, XnX7A7r'f^”fm.i P r«r^fT 
l«eitfttf4&«ci'. 

fciii'x., FA/MA i:lot, *-Xy 
y-atsx^itecdiHfc? ft, pc- 8800 y y - 
X^U-J/’?^7^yt LTfiE5 0&&, 
A fc i * * ©ttMtefc-Mfr&Ift uVivy 
^^7 • 7X!»X-S'«y0lMHfc*T' 
AS„ 

ifc. |5l^!:5a-^-7 70IJ**i:l)^ 
a-CS 5 c fc **/.;< JAii, 'fy=iyji 
fit, X— x, 7— Xn, X— A4i' 
a^ftlTA*,, Rt, 
>v^y.R^7i-xi:ioi:, 
u^-yx^tOCT**-^ y h© 
Hi', i© FA/MA i:tt«Jdr*«3 ft 
xi'So tiRoa? z tot'# 

S X 5> * W > X v V X«86*' i ft-tr A S o 

K.I.T.T0J: ? Uaytfi-y t Ats£ 

ts«i:ii, its, mgftfci'9 I 5ft 
sang h urns* 1 , mm c 
^0®— ^4-K*UiLf i’SC fcttffliti' 

BASIC 0&£3Sft^ 

i£S6*- K 1 *‘f,i£56^-F2 uiof, 
V'-ofci'iBi*»?gftofc0*». fe^citA 
TAJ: 7. 

£ fc £ t t£SS^ t (J, ;X0 2 o*- c, 4 
oTi'So 

®rtnA«v, hWflg 



®-y-9y nmb 

(D07tB^^? M*figli512&i*C> 

8fe«r*AT'*S-r««IIBT', 

2 i:4-oT fe^ftoTi'/jri’. L7j*RT, 
@0-9-!? y K'a^* s $Ao7.*0TrA5 o * 

t**r 

& 

oiijp 

7^FMfS3fi'Xfv* 6 

flrl:*-9fc. 

®X y -t 7 h #fe62l@*'127l@1sex 5 J: 

5 1-4-3 A* o 
OtrlS: 

®x f v - 1 y XA^fii 6 #*ws ft/;. 

(D PCM #« 1 #***f»S ftfc. 

PCM 

FA/MA U 4 o T * — X4 X «&*'& 
ftSftAADA'**, 4 i'T* & PCM fy/ 

y yxa^uMis^4i.'= 
fy/y yxu- h ij 4 *> tieKHz-r 

256K''M h0|iffl7ty (fyyK/t 
'/) ?r^o Ti'T, 4 KHz -0^120^, 16 
KHz ■c^j30tP(Df->y p >j yx**tf a s c z 
0#ffly^t y0^ii7B xy 

i:ltt: tX-Tli 5 0T, I'AUT, -y-y 

xy yxwn-xt LTt^fflnTSg-c'ASo 
fijgiJ:, it-7-i-y y'^^y 77 w'oT®s 
BfftA'X, 88 1 J 88 d> L <l|C.^t*/;i'„ 
RT; 0 #g Aifyxy y?m4 

ffli'A* r ^0{faS xyy'i-7j *%i:g 
#t 4 r VOICE MEMO 88j XA 5 0 
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2.PCMWI 

r VOICE MEMO 
88j 



mmmm 

r VOICE MEMO 88 j U, VOICE MEM 
Oj t r TIME MANAGER j *• C,l£« Ti' 

S dim 

C t * T -tT& 5, 

f&tli, *©«7», BB#r"-*fc*i:L'C 
(MBOtfSftfr* t> ©t^S, :.©!*£© 

3>W-S'3>i:iot, 

•COi'XtAirWt S ^ * K li, 7°n 
^^©etftfcisfeDtf. — fil 

“• tftf-C'fTiiJ: 5i:IMH-L-Ci’* (02# 
M). 7;i'*-fr1£5 0t'#nijr, -©*x 
r A©jfJifc!*#«-t 4 /'*> 7 o 

■rs s 1 ? icftnur, #*.**- £(£7# 
gfeft < ftS*V IMI'. 

• r VOICE MEMOj 
VOICE MEMO U,riS*»-t>7 , 'J > 

0&-C'7r4^t4 tor* !>, ilrt-# 
£ • • 7°n r 7 h ft fc' * f 'BJ88t'* S» 

H -7 01*1987# 1 n 1 B*-U999#12H 

310 M#(>irt«®±, b«* 

fc fc fei:W0i-C'S^tT<n4. L**fc, 
#^f'-^ft0«Fi:o«,'-c*i'lii:y^- h 
iKtefcWSitii 0 II L X t IBI 

C#, n, 0 , It#, fc *(/#**, 

t <.’ 7 ttia^r* s o ifc, K 
**.;<* h t lT(s6ffl-fS©ft^, 0^ 

oi i 0 B#r"— ft fc fc felTS 

So 

1 1 #*■ 

c, ^64# 2 -r&o . 5fpmmrmz.*it&'C t> 
D, ltt07B7^-f 4 X* Clift oft 
IMS©***'- * * J iI£ L X fc »b ft I-. 
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&WPr-*(D& 
lil6r'-**T'-t'*So ADPCMO-Tvr 
!I *7V-M f 8 KHz © t S, 2D ©7 n 
yl'-f-ixi'li, tei t 4 fti'L 5#x 

i6?'-*TVoi;rvi:fts„ iif, r vo 

ICE MEMO 88j 

IiSliiKj4.5t> (TIME =45) Ht^Uin' 
tZo *. i-3 t Lft^^ftC., C0<li(.'* f 
*> J: ? 

t^f-)T7r'(^©fSlif-i *7 Y 
117 7 4 /■'’’VOICE. DIR”**If o T S. 
cn* ? fit»i:fise>ns®i*, 
^f-)fP7o y x 7 t:”V0I 

CE. DIR”* { #£ L ft fc £ Xh S„ ^^r" 

-7ffl7n -.ykf-T^ x7l*, ftS^<# 

ffl®(>0%'ffljt-rs0* i J:'.'o 
VOICE MEMO 88* X f A^fST S 
7 7 4 » t*. C. ©’’VOICE. DIR” t 
-ft y 7 4 ^’’VlOOOO. PCM”*« C,”V1001 
5. PCM” 4 -r©fU77 7 4 »K\1X*> s o 
Z<xf>077 / f-' l '3r VOICE MEMO 88* 



X f AiaJt* 1 tt ft (, ft I'o 

• r TIME MANAGERj 

TIME MANAGER I* * X f A 7 n *, 
9 Of 0 l#* f VOICE MEMO -T7 r -4 ^ L 
ftBIftfc — ISclft fc £ i:, SiftKli:*®# 

i*r- * l©WM::t 

< ns, 

-Sfcfeftii, 

(DBI$0*-K (DATE AND TIME) 
©■WBAfW©*- K (TIME ONLY) 
^Iffits: t* f r» So 
®©0«F©^-K«ra^t4xif, *©B 
-7 If *‘0 fc © ^ /c fc ?> U5sp G-e-T < 
ns i, ©©iw'o©*- K«ra«*n 
1*0-70 CMtfi ft < , fc©*$S8crfc t:*U?> 

-e--c<ns 0 WPr-ftFnyvyV-74 

X 7 C 7 7 4 * L ft 0 BH>, TIME MAN 
AGER ©ffl&Ctfc C -Ca^lf 1 l'o 
4 •V !) — , t*x!)-, 4jJ;i/74-7 
!) - ftltffif* ni 4 T ®0 B#£ 0 *— K *■, 
i 7.*, ?a v -ft t ©ir*nif(2)®«7^ 
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lt<S>*-K* ? jga-r££5o 

b ene * y k 

Atiif, g^l/.Hvvt'Sfl^v 
*-^7 7 5. x 

V t"#ia ©7 7 h ^ i A-t 7*^4 £ 4-# 

ffl® 7 7 4 a- l T, TIME 

MANAGER £(2)0l#|Ii!A'tt©*- Ffl 
fi-tnif, h t lili*>®tt*i:i£s5lTi.' 
T & 

^A^rscmsfis©*-**, 
^Tr?Oti:^c;iiAT'< So AVAn-x 
i''fc'#ai 47 >f — 7 V—ttb (DtfZi'tD-C, 
BIB C* i t:1r)*fx"-7ffl7 b ■> E° — 7 * 7 X 
iMt:.aA<.'#fi 
<Dm*7u y\s-rj X? UkC-M£ ZCD 
-C&ixtf, ffl<Din#>t:T f —*kfSix.lXis 
i'T®00«f0t-hYgiljt5: t b-c 

§> So 

VOICE MEMO 88£Sffflt S C &<k<D 
i'XrA«?t'ib So 
CD PC8801FA/MA, 4 A 14, 
SRJaft++*7K#-Kn 
^ © + t: 14 N88-BASIC Ver2.0W± 
t, fWti^-K2i:tS7'o/7 
^7r^i ! ^jnti'S 
®X*4 X7°W 

®7 77’+xE > -;&- + -?7 7 

3 7^-7*14:1, ztic,k&^K 

3- K-CIS^t So 

tf***s t floras 

X<P(D 

itt 

(D basic mm^-^2) visxT^rj 

zszimti 

1-9y m-KlUce>, #Jg®7xx 
Af-I X 7 S >£©4 i 3 k°— rwar £ l' 
L, FA/MA 4 l b, 7 XxA* 4 X 7 S’ 
b k?-LA4&, !) X M **-fc-7'ir§ S 
4 5 i:WI47r^^i' < 

T 4 x 1*4 I' 

®ID-fc7 7S’&©4 5 (:*£&*. S 
l W\Wz*-7y?&yT4*»= l 
2ffi»©T2 77=88 
3 BASIC 7 c/ 7A 
BLOAD ”fm. ipl”, R 



®! X h l®BASICro^xA4-A*L 
T<fc®4 5 U 7 b X 7i;-fc- 

7*t S 

SAVE "VM88” © 

(&) 1 Kx 7 T'i'Xr ACDi'&li-t- 7* 
©fji: BASIC 7° b 7' x a * © DRIVES 
=” 2 ”*• DRIVES = ” 1 ”i: 

<o 

(Daytfa-^CfgX/f -yf-kAtl, 
DRIVE 1 i: VOICE MEMO 88® -7 
XrArV X7k-b-y h l? ]) -by h Z 

4 v* km 

©”7 7*3 7*7 b 5>737 7-?X7 
[Y/N] ”(:** L-C[N]4f-*|?-r 
®RUN ”VM88”@T' VOICE MEMO 88* ! 
eftts 

VOICE MEMO 88 k eftt S t , 4 1* S' 
Xfi^D7ii'®^IrlT7o *MS®B-7 
lffcftlll«rArt+S*», *©4 41*4 I't 
SI4, ¥i: RETURN A-*tf1\, fc 5- 
*. B'7ittW^^LTStlS.L-C< S 
©t\ 313:£ 4^(4’ HELP A-$rlft L, 

4 It ft I* RETURN A-t*7 4 7 7 - *. 
— i:#So 

7777-i— rii, [DA— f VOICE 
MEMO, tUA-ir TIME MANAGER, [I] 
A- —T 7 x r a 7 b .7 7 ® tt£ t ; tmtw 
So SA-^fflt t^Tr^So 

• r VOICE MEMOj 

Mint:, 

’’SET PCM DATA DISK 
ON DRIVE 2 
OK (RETURN) ? ” 
t**LT, W-)ii7D7K-f-( 

7 70-fcx h k^L X < S©!", t7) 
IA<? RETURN A-*#*. £lffc, #j» 

x'— 7 ffl 7 b 7f-f-( x7©HL#iii, 

'£>-f ^®**©t §A'tfClTfcttlt 4x1*4 
f.Sn.'o 

(DIU 4 AI4G 

x'-7)it]Rffl07-y^fc±tfs 
©■[0 4 Ai*D 



x'- 7 iiMRffl© 7 - y a- k Tlf S 
®EB . 
m%kft5 
41 *. 

RETURN] REC START 

tl^5n, return a -S’# la aim 

*‘^ft*i!> J l«te$ 4 xS. i ©ftj&l'tt. ft 
l 1 **- 7 147- 7 7 K 7 * ') U* i C, ti s o 

ttTtttur, 

1 ] OK 2 ] TRY AGAIN 
t^SUSo 

EJA-frfftfc. 

SET DATE OR TIME ? 

1] YES 2] PRESENT 

EA-lftc t-rB^^S^SU 
BICKStSZti'f^Si', 7 Xt^7 
b -7 7©fii-r 4 tttiMfUA-^if^if t I'o 
JJLtOftfrJW b St, 7- 7 7 F x !) 
R®7 # -)fSf^xt'i:Stt„ 

*f,4'L'J0[I]A— C 

tiLttJ<o 

®B+- 

W-)iffl7B .7tt— r'^f X7*’C, 

7- 7 7 K 7 * y cliS L Ar- 7 i K* 

&*-, i<or-^k^Ltzmv£tm 
&kft5o 
©□A- Si* 

ftZltzr-* ®5i**lT5. At'L, 

7°nf 7 h©*'i-7Ar'-7iiii*t'^ 
Al'o 

©SA- 7°bt 7 h S-^’itS 

Ib^ L Ax'— 7(:7°b t 7 h S-*‘itS 0 
Lm 0A— 'C'7 'b x 7 h kM-’t 4 1', 

□a— niii*r& a«.-o 

AA'L, S®7B ytf— 7^/f X7©7 
*-»>!> Srff -» A 0 , VOICE MEMO 
88®7xxAiun-rti^tnif, ;®*> 
r or i44i'. 

®0A- 7°bt 7 Mr^-T 

|gSLAx'-7©7°BT ; 7 (. S'^To 
©□A- ft^B#Rg©IS:^ 

ftWLAi'^raS'10*»c,640©«SHT' 
tStS. 1 141^0. So 
©BA- 7D7tf-f-fx^Silf 
jLS 

W-)(ffl7B y \£—7-U x 7©n 
L^A*It 7 o 

® l CLR I A- >(7^-a-i:^s 
VOICE MEMO 88© 7 -I 7 7 - — 
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zr-?<DBm r*5jrrs, 



i:#J. 

• r TIME MANAGERj 

VOICE MEMO tPHti:, 

-jiB7o v tf-r'-f * -fc -y ht S <> 



t, v*-s?,*yMrlinft+*. 
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1000 ’ ***************************************************** 
1010 • VOICE MEMO 88 Version 1.0 

1020 ’ Copyright 1987 H. BANDO All rights reserved. 

1030 ’ 1987 12.17 file name "VM88" 

1040 ' ***=|c*#>l<#*#>l<#***#***##*****#******#****»»K#>K***#***>K**# 

1050 * 

1060 ON ERROR GOTO TERROR. TRAP 
1070 ON HELP GOSUB *HP :HELP ON 
1080 ON STOP GOSUB *SP : STOP ON 
1090 ON KEY GOSUB *KY : KEY ON 
1100 ’ 

1110 DEFINT A-Z 

1120 CLS 3 : SCREEN 0,0 : COLOR 7 
1130 WIDTH 40,25 : CONSOLE 0,25,0,1 
1140 ’ 

1150 DEF USR0=&H4290 1 cursor on 

1160 DEF USR1=&H428B ’ cursor off 

1170 SF=8 ’ sampling frequency 

1180 TS=0 : TR=45 : TP=45 : MAX. C=750 

1190 CMD PCM 255, 3, SF, 0 

1200 CMD.BGM 1:CMD PLAY #5,”" 

1210 FOR 1=0 TO 7 : COLOR= Cl, I) : NEXT I 
1220 LINE(0, 0)-(639, 199), l.BF 
1230 ' 

1240 N=1 5 

1250 DIM F$ (N) , FU (N) , FS4 (N) 

1260 DIM NS(N),N1*(N),NSS(N) 

1270 DIM VS(N),V1*(N),VSS(N> 

1280 DIM K* (N) , K1S CN) , KS* (N) 

1290 DF=0 ’ dir flag found=l 

1300 DRIVE*="2” :DNAME*=” VOICE. DIR” : DIRS=DRIVES+" : " +DNAME* 
1310 ’ 

1320 IY=1987 : IOFF=3 ’ (0~6) 1987/01/01=THU 

1330 DIM Y(l, 12) 

1340 Y CO, 0) = 0 : Y (0, 1) =31:Y(0,2> =28:Y(0,3) =31:YC0,4) =30 

1350 Y <0, 5) =31 :Y (0, 6) =30:Y(0,7) =31:YC0,8) =31:Y(0,9) =30 

1360 Y (0, 10)=31 : Y (0, 11)=30:Y(0, 12)=31 

1370 Y (1 , 0) = 0: Y (1 , 1) =31:Y<1,2) =29:YC1,3) =31:Y(1,4) =30 

1380 Y(l, 5) =3 1 : Y (1 , 6) =30:YC1,7) =31:Y(1,8) =31:Y(1,9) =30 

1390 YC1, 10)=31 : YC1, 11>=30:Y(1, 12)=31 
1400 DIM WK$ (6) 

1 4 1 0 WK$ (0) =" SUN” : WK* ( 1 ) =" MON" : WK* (2) =" TUE” : WK* (3) =" WED” 
1420 WK* (4) =” THU” :WK* (5)="FRI” :WK* C6)="SAT" 

1430 ’ 

1440 *INIT. DATE. TIME 
1450 CLS 

1460 LOCATE 3, 4: PRINT ” 1 SET SYSTEM CLOCK I " 

1470 LOCATE 4,6:PRINT ” YEAR= 1987 ~ 1999 [ 87 ~ 99 I " 

1480 LOCATE 9,8:PRINT "HELP! TRY AGAIN" 

1490 LOCATE 9,10:PRINT "RETURN! DEFAULT" 

1500 ON HELP GOSUB *HP. IT: HELP ON 
1510 *IN1T0 

1520 LOCATE 7, 14:PRINT "PRESENT DATE = ” ; DATE* 

1530 LOCATE 7, 16:LINE INPUT "DATE »«/»»/## ? " ; DT* 

1540 IF DT*=" " THEN *INIT1 

1550 IF LEN(DT*)<>8 THEN *INIT. DATE. TIME 

1560 GOSUB »GET. NAME 

1570 GOSUB *GET. YMD 

1580 GOSUB *CHECK. DATE: IF F=0 THEN *INIT. DATE. TIME 
1590 DATE*=DT* 

1600 ’ 

1610 *INIT1 

1620 LOCATE 7. 18:PRINT "PRESENT TIME = ";TIME4 

1630 LOCATE 7,20:LINE INPUT "TIME ##.##.#« ? " ; TMS 

1640 IF TM*=" " THEN *INIT2 

1650 IF LENCTM*)<>8 THEN *INIT. DATE. TIME 

1660 GOSUB *GET. NAME 

1670 GOSUB *GET. TIME 

1680 GOSUB *CHECK. TIME: IF F=0 THEN =KINIT. DATE. TIME 

1690 TM*=MID* (TM*. 1, 2) +" : "+MID* (TMS, 4, 2) +" : "+MID* (TMS, 7, 2) 
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"PRESENT DATE = " ; DATE* 
"PRESENT TIME = " ; TIME* 

' HELP > ? " 



1700 TIMES=TM« 

1710 HELP OFF 
1720 ’ 

1730 *INIT2 
1740 CLS 
1750 WHILE 1 

1760 LOCATE 7, 10:PRINT * 

1770 LOCATE 7. 12:PRINT ’ 

1780 LOCATE 7, 16:PRINT "OK ( RETURN . 

1790 A*= INKEY* 

1800 IF A*=CHR* (13) THEN *MA IN 
1810 WEND 
1820 ’ 

1830 *MAIN 
1840 GOSUB *FAN 

1850 ON HELP GOSUB *HP : HELP ON 

1860 GOSUB *DSP. MENU1 

1870 GOSUB *KEYIN : PRINT AS 

1880 IF A»=" 1 ” THEN *VEDIT0 

1890 IF A*=” 2” THEN *TM. MANAGE 

1900 IF A*=" 3” THEN *INIT. DATE. TIME 

1910 IF A*=” 9" THEN *QUIT 

1920 GOTO *MAIN 

1930 ’ 

1940 *VEDIT0 

1950 GOSUB *DSP. MENUO 

1960 GOSUB *KEYIN 

1970 IF A*<>CHRS (&HD) THEN *VEDIT0 
1980 GOSUB *DSP. CHECK. DIR 
1990 GOSUB *SET. DIR 
2000 ’ 

2010 *VEDIT 

2020 GOSUB *GET. DIR 

2030 FOR 1=0 TO N 

2040 FSS (I)=F* (I) :NS* (I) =N* (I) : VS* <I)=VS (I) :KS* (I)=K8 (I) 

2050 NEXT I 

2060 GOSUB *DIR. SORT 

2070 GOSUB *DSP. VEDIT 

2080 NF=YC : GOSUB *GET. POS: PRINT A* 

2090 GOSUB *CNV. V ’ out yy v* 

2100 IF A«=" +" THEN GOSUB *REC:GOTO *VEDIT 
THEN GOSUB *PLY:GOTO *VEDIT 
THEN GOSUB *ERS:GOTO *VEDIT 
THEN GOSUB *UNP:GOTO *VEDIT 
THEN GOSUB *PRT:GOTO *VEDIT 
THEN GOSUB *CHANGE. T: GOTO * VEDIT 
2160 IF AS=" 2" THEN #VEDIT0 
2170 IF A*=CHR* (12) THEN *MAIN 
2180 GOTO *VEDIT 
2190 ’ 

2200 *FAN 

2210 CMD PLAY "044V13O3L32CC+L1D" 

2220 RETURN 
2230 ’ 

2240 *FAN 1 

2250 CMD PLAY "@27V1304L16CEGB>L1C" 

2260 RETURN 
2270 ’ 

2280 *DSP. MENUO 
2290 CLS 

2300 LOCATE 6, 10:PRINT "SET PCM DATA DISK ON DRIVE ";DRIVES 
2310 LOCATE 10. 12:PRINT "OK ( RETURN ) ? " ; 

2320 RETURN 
2330 * 

2340 *DSP. MENU1 
2350 CLS 

2360 LOCATE 2,4:PRINT ” 1 VOICE MEMO 88 VERSION 1.0 I " 

2370 LOCATE 12,8 :PRINT "11 VOICE MEMO" 

2380 LOCATE 12. 10:PRINT "21 TIME MANAGER- 
2390 LOCATE 12. 12 : PRINT "31 SET SYSTEM CLOCK" 

2400 LOCATE 12. 16:PRINT "91 END" 

2410 LOCATE 12, 20: PRINT "COMMAND " ; 

2420 RETURN 
2430 ‘ 

2440 *DSP. VEDIT 
2450 CLS 

2460 LOCATE 1,1:PRINT ” 1 VOICE MEMO I 1 

2470 XD=4 : YD=3 : YC=0 
2480 FOR 11=0 TO N 

2490 IF FS* (I I)=" 01" OR FSS(II)="81" THEN *DVD1 ELSE *DVD2 



2110 IF AS=”=" 
2120 IF A4=” - 
2130 IF A*=" / 
2140 IF A4=" * 
2150 IF AS=" 



2500 ’•'DVD 1 

2510 Y4=RIGHTS CSTR* CYC) , LEN CSTR* CYC) ) -1) 

2520 YS=R IGHT* C" 00" +Y* , 2) 

2530 YM*=RIGHT* CSTR* CYC+1) , LEN CSTR* CYC+1))"1) 

2540 YMS=RIGHTS C" 00” +YMS , 2) 

2550 NS=NS* Cl I ) :GOSUB *DIV. NAME 

2560 NS=NS* Cl I) :GOSUB *GET. YMD 

2570 GOSUB *GET. WEEK : IF F=0 THEN *ER2 

2580 IF FSS Cl I) =" 8 1 ” THEN CSR*=”*" ELSE CSR*="0" 

2590 TG*=RIGHTS CKS* Cl I) , 3) 

2600 LOCATE XD,YD:PRINT YM*;":";” " ;DTS ; " ” ; WEEK* ; " ";CSR*;" ”;TMS;" " ; TGS 
2610 YD=YD+ 1 : YC=YC+ 1 
2620 *DVD2 
2630 NEXT II 

2640 LOCATE 1,20:PRINT ” [+1 REC C=IPLAY [-] ERASE 1*3 PRO C/3 UNPR” 

2650 LOCATE 1,21 :PRINT " II) TIME C 123 CH. DISK [CLR3 MENU" 

2660 LOCATE 9, 21: PRINT TR;")" 

2670 RETURN 
2680 ’ 

2690 *DSP. CHECK. DIR 
2700 CLS 

2710 LOCATE 7,11:PRINT "CHECK VOICE DIRECTORY " 

2720 RETURN 
2730 ' 

2740 *DSP. MAKE. DIR 

2750 CLS 

2760 GOSUB *FAN1 

2770 LOCATE 7, 11:PRINT "NOW MAKING VOICE. DIR " 

2780 RETURN 
2790 ’ 

2800 ♦KEYIN 

2810 AS=INKEYS : A1S=USR0 CA1*) 

2820 IF AS=” " THEN *KEYIN 
2830 RETURN 
2840 ’ 

2850 *QUIT 

2860 STOP OFF: HELP OFF: KEY OFF: TIME* OFF 
2870 FOR 1=0 TO 7 : COLOR= Cl . I) : NEXT I 
2880 WIDTH 80,25 :CONSOLE ,,1:CLS 3 
2890 ON ERROR GOTO 0 
2900 END 
2910 * 

2920 *SP : GOTO *QUIT 
2930 *HP 
2940 *KY 
2950 RETURN 
2960 ’ 

2970 *SET. DIR 

2980 DM*=ATTR* CDIR*) ’ check dir 
2990 RETURN 
3000 ’ 

3010 TERROR. TRAP 

3020 IF ERR=53 AND DF=0 THEN ♦MAKE. DIR ELSE *ER1 
3030 1 

3040 *MAKE. DIR 

3050 GOSUB *DSP. MAKE. DIR 

3060 FOR 1=0 TO N 

3070 DD*=RIGHT* CSTR* Cl) , LEN CSTR* Cl) ) -1) 

3080 F* CI)="00" :N* Cl) =" 000000000000" : VS CI)=RIGHT* C"00”+DD*, 2) 

3090 KS C I) =" 0000" 

3100 NEXT I 
3110 ’ 

3120 GOSUB *PUT. DIR 
3130 DF=1 
3140 RESUME NEXT 
3150 ’ 

3160 *ER1 

3170 CLS 3: STOP OFF: HELP OFF: KEY OFF: TIME* OFF 

3180 FOR 1=0 TO 7 : COLOR= Cl , I) : NEXT I 

3190 WIDTH 80,25: CONSOLE ,,1 

3200 ON ERROR GOTO 0 

3210 END 

3220 ’ 

3230 *ER2 

3240 CLS 3 : STOP OFF : HELP OFF : KEY OFF : TIME* OFF 
3250 FOR 1=0 TO 7 : COLOR= Cl , I) : NEXT I 
3260 WIDTH 80, 25 : CONSOLE ,,1 
3270 PRINT "SYSTEM ERROR 100" 

3280 ON ERROR GOTO 0 
3290 END 



3300 ’ 

3310 ♦PUT. DIR 
3320 OPEN DIR* AS #1 
3330 FOR 1=0 TO N 

3340 FIELD #1,1*16 AS DMY*,2 AS FI* (I), 12 AS N1S(I),2 AS VI* (I) 

3350 NEXT I 
3360 FOR 1=0 TO N 

3370 RSET FI* (I) =F* (I) : RSET N 1* (I) =N* (I) : RSET V1S(I)=V*(I> 

3380 NEXT I 
3390 PUT #1, 1 
3400 FOR 1=0 TO N 

3410 FIELD #1,1*4 AS DMY*,4 AS K1S (I) 

3420 NEXT I 

3430 FOR 1=0 TO N 

3440 RSET K1*(I)=KS(I> 

3450 NEXT I 
3460 PUT #1,2 
3470 CLOSE #1 
3480 RETURN 
3490 ’ 

3500 *GET. DIR 
3510 OPEN DIRS AS #1 
3520 FOR 1=0 TO N 

3530 FIELD #1,1*16 AS DMYS.2 AS FI* (I), 12 AS N1S(I),2 AS VI* (I) 

3540 NEXT I 
3550 GET #1. 1 
3560 FOR 1=0 TO N 

3570 FS (I)=F1S(I> :N* (I)=N1S (I) :V* (I)=V1* (I) 

3580 NEXT I 
3590 FOR 1=0 TO N 

3600 FIELD #1,1*4 AS DMYS, 4 AS K14(I) 

3610 NEXT I 
3620 GET #1.2 
3630 FOR 1=0 TO N 
3640 K*(I)=K1S(I) 

3650 NEXT I 
3660 CLOSE #1 
3670 RETURN 
3680 ’ 

3690 *DIR. SORT 

3700 1 In N FS*(N) NS* (N) VS* (N) KS* (N) 

3710 ’ use WO* Wl* W2* W3* NW I I *B1 
3720 FOR I=N TO 1 STEP -1 
3730 NW=I-1 

3740 W0S=FS* CI-1) :W1*=NS* Cl — 1) :W2*=VS* Cl — O :W3S=KSS Cl — 1) 

3750 FOR J=I TO N 

3760 IF Wl* <= NS* (J) THEN *B1 

3770 FS* (J-1)=FS» (J) : NS* (J-1)=NS* (J) :VSS (J-1)=VS* (J) : KS* (J-1)=KS* (J) 

3780 NEXT J 
3790 *B1 

3800 IF NW <> J-l THEN FS* CJ-1) =W0S : NS* (J-l) =W1S : VS* (J-l) =W2S : KS* (J-l) =W3* 

3810 NEXT I 
3820 RETURN 
3830 ’ 

3840 *GET. NAME 
3850 ’ in DT* TM* 

3860 ’ out N* 

3870 DT1*=MID* (DT*. 1, 2)+MIDS (DT*. 4, 2)+MID4 (DT*, 7, 2) 

3880 TM1*=MID* (TM*, 1 , 2) +MID* (TMS, 4, 2) +MIDS (TMS, 7,2) 

3890 NS=DT14+TM1S 
3900 RETURN 
3910 ’ 

3920 *DIV. NAME 
3930 * in N* 

3940 ’ out DT* TMS 

3950 DT*=MID* (N*. 1 , 2) +"/" +MIDS (N*. 3, 2)+”/”+MIDS (NS, 5, 2) 

3960 TM*=MID* (N*, 7, 2)+" : " +MID* (NS, 9, 2) +" : "+MIDS (N*. 11, 2) 

3970 RETURN 
3980 ’ 

3990 *MAKE. FILE 
4000 ’ in V* 

4010 ’ out SNAME* 

4020 SNAMES=DRIVES+” : " V10" +RIGHTS (”000"+V*, 3)+". PCM" 

4030 RETURN 
4040 ’ 

4050 *GET. POS 

4060 • in YD NF (0~N+1) 

4070 ' out YY 

4080 IF NF>N THEN Y=YD-1 ELSE Y=YD 

4090 X=2 1 : Y 1=3 39 
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4100 

4110 

4120 

4130 

4140 

4150 

4160 

4170 

4180 

4190 

4200 

4210 

4220 

4230 

4240 

4250 

4260 

4270 

4280 

4290 

4300 

4310 

4320 

4330 

4340 

4350 

4360 

4370 

4380 

4390 

4400 

4410 

4420 

4430 

4440 

4450 

4460 

4470 

4480 

4490 

4500 

4510 

4520 

4530 

4540 

4550 

4560 

4570 

4580 

4590 

4600 

4610 

4620 

4630 

4640 

4650 

4660 

4670 

4680 

4690 

4700 

4710 

4720 

4730 

4740 

4750 

4760 

4770 

4780 

4790 

4800 

4810 

4820 

4830 

4840 

4850 

4860 

4870 

4880 

4890 



*GP1 

LOCATE X, Y 
GOSUB *KEYIN 
IF NF=0 THEN *GP2 
IF A4=CHR» C&H1E) THEN Y=Y~1 
IF A*=CHR« (&H1F) THEN Y=Y+1 
IF A$=CHR» (&H2C) THEN Y=Y-1 
IF A*=CHR$ (&H2E) THEN Y=Y+1 
IF Y < YI THEN Y=NF+YI 
IF Y > NF+YI THEN Y=YI 
*GP2 



IF A*=" +” 
IF A4=" =" 
IF A$=" 

IF A$="*" 
IF A4=" /" 
IF AS=" 1" 
IF A$=" 2" 



THEN *GP3 
THEN *GP3 
THEN *GP3 
THEN *GP3 
THEN *GP3 
THEN *GP3 
THEN *GP3 



YY=CSRLIN-YI+1 

RETURN 



*CNV. V 

•in N YY C0~N+1> 

’ out V* V 

IF YY=0 THEN *CV0 

IF YY-1 > N THEN *VOICE. FULL 

YI=0 ’ yy non zero 

FOR 1=0 TO N 

IF FS*<n=”01” OR FS$ (I) =" 8 1 " THEN *CV1 ELSE *CV2 

*CV1 

YI=YI+1 

IF YY=YI THEN *CV3 
*CV2 
NEXT I 
GOTO *CV0 
*CV3 

V4=VS»(I> :V=VAL <V$) 

RETURN 



*CV0 ’ yy zero 
FOR 1=0 TO N 

IF FS4(I><>"01" AND FS4(I)<>"81" THEN *CV4 
NEXT I 
*CV4 

V*=VS# (I) : V=VAL (V*) 

RETURN 

*UNP 

IF F$ (V) <>" 01 " AND F# (V) <>" 81" THEN *UNP1 
GOSUB *CLS. M 

LOCATE 3, 23: PRINT "UN-PROTECT 
F$ (V)="01" 

GOSUB *PUT. DIR 
GOSUB *CLS. M 
RETURN 

*UNP1 

GOSUB »CLS. M 

LOCATE 3, 23: PR I NT "CAN NOT UN-PROTECT !"; 

FOR 1=0 TO 2000: NEXT I 

GOSUB *CLS. M 

RETURN 

*PRT 

IF F$ (V) <>" 01” AND F$ (V) <>" 81” THEN *PRT1 
GOSUB *CLS. M 

LOCATE 3. 23: PR I NT "PROTECT 
F$ (V) ="81" 

GOSUB #PUT. DIR 
GOSUB *CLS. M 
RETURN 

*PRT1 

GOSUB *CLS. M 

LOCATE 3,23: PRINT "CAN NOT PROTECT !"; 

FOR 1=0 TO 2000: NEXT I 



4900 GOSUB *CLS. M 
4910 RETURN 
4920 ’ 

4930 ♦ERS 

4940 IF F$ (V) <>” 01" AND F*CV)<>"81" THEN ♦ESI 
4950 IF F*(V>="81” THEN *ES2 
4960 GOSUB ♦CLS. M 

4970 LOCATE 3,23:PRINT " ERASE . .."; 

4980 F* <V)=”02" :K* CV)="00" 

4990 GOSUB *PUT. DIR 
5000 GOSUB ♦MAKE. FILE 
5010 KILL SNAMES 
5020 GOSUB *CLS. M 
5030 RETURN 
5040 ’ 

5050 ♦ESI 

5060 GOSUB ♦CLS. M 

5070 LOCATE 3,23:PRINT "CAN NOT ERASE ! " ; 

5080 FOR 1=0 TO 2000: NEXT I 
5090 GOSUB *CLS. M 
5100 RETURN 
5110 ’ 

5120 *ES2 

5130 GOSUB ♦CLS. M 

5140 LOCATE 3,23:PRINT "PROTECT VOICE !"; 

5150 FOR 1=0 TO 2000:NEXT I 
5160 GOSUB ♦CLS. M 
5170 RETURN 
5180 ’ 

5190 ♦PLY 

5200 IF F# CV) <>" 01" AND F$<V)<>"81" THEN ♦PLl 

5210 GOSUB ♦CLS. M 

5220 LOCATE 3,23:PRINT "LOADING 

5230 GOSUB ♦MAKE. FILE 

5240 CMD PCM LOAD SNAME4.TS 

5250 TP=VAL (K* (V) ) 

5260 GOSUB *CLS. M 

5270 LOCATE 3,23:PRINT "PLAYING" ; TP; " 

5280 CMD PCM PLAY TS, TP 
5290 GOSUB *CLS. M 
5300 RETURN 
5310 • 

5320 *PL1 

5330 GOSUB *CLS. M 

5340 LOCATE 3, 23: PRINT "NOT FOUND !"; 

5350 FOR 1=0 TO 2000:NEXT I 
5360 GOSUB *CLS. M 
5370 RETURN 
5380 ’ 

5390 *REC 

5400 DFR=DSKF (VAL (DRIVE*) ) *5 

5410 IF DFR < TR THEN *VO ICE. FULL 

5420 TT=0 

5430 FOR 1=0 TO N 

5440 TT=TT+VAL (K$ (I) ) 

5450 NEXT I 

5460 IF TT+TR>MAX. C THEN ♦VOICE. FULL 
5470 IF FS (V) =” 81 " THEN *REC5 
5480 *REC0 
5490 GOSUB ♦CLS. M 

5500 LOCATE 1,23:PRINT " RETRUN1 REC START TIME =";TR" "; 

5510 GOSUB ♦KEY IN 

5520 IF A*<>CHR$(13) THEN ♦RECO 

5530 GOSUB ♦CLS. M 

5540 LOCATE 3,23:PRINT "RECORDING "; 

5550 COLOR= (1,2) 

5560 CMD PCM RECORD TS, TR 
5570 COLOR= (1,1) 

5580 ♦REC 1 

5590 GOSUB ♦CLS. M 

5600 LOCATE 3,23:PRINT "II OK 21 CANCEL "; 

5610 GOSUB ♦KEYIN:PRINT A*: 

5620 IF A*="l" THEN ^£02 
5630 IF A*=" 2” THEN ♦VEDIT 
5640 GOTO ♦REC 1 
5650 ♦REC2 
5660 GOSUB ♦CLS. M 

5670 LOCATE 1,23:PRINT "SET DATE OR TIME ? 1ISET 21 PRESENT 
5680 GOSUB ♦KEY IN : PRINT AS; 

5690 IF A$=" 1" THEN GOSUB ♦SET. DT :GOTO ♦REC 4 
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5700 IF AS=" 2” THEN *REC3 
5710 GOTO ♦REC2 
5720 *REC3 
5730 GOSUB ♦CLS. M 

5740 LOCATE 3,23:PRINT "SAVING 

5750 DT*=DATES:TM*=TIME*:GOSUB ♦GET. NAME 
5760 ♦REC4 

5770 S*=RIGHT4 CSTR* (TR) , LEN (STR* (TR) ) -1) 

5780 F* (V)=”01" :N* (V)=N*:K* (V)=RIGHT* ("0000”+S«, 4) 

5790 GOSUB *PUT. DIR 

5800 GOSUB ♦MAKE. FILE 

5810 CMD PCM SAVE SNAME*. TS, TR 

5820 GOSUB ♦CLS. M 

5830 RETURN 

5840 1 

5850 *REC5 

5860 GOSUB ♦CLS. M 

5870 LOCATE 3,23:PRINT "PROTECT VOICE !’; 

5880 FOR 1=0 TO 2000: NEXT I 
5890 GOSUB *CLS. M 
5900 RETURN 
5910 ’ 

5920 ♦SET. DT * help try again 
5930 CLS 

5940 LOCATE 4.2 :PRINT ” 1 SET DATE OR TIME I 

5950 LOCATE 4.6 :PRINT " YEAR= 1987 ~ 1999 I 87 ~ 99 ] 
5960 LOCATE 4.8 :PRINT " HELP] TRY AGAIN" 

5970 LOCATE 4,10:PRINT " RETURN] DEFAULT" 

5980 ON HELP GOSUB ♦HP. DT : HELP ON 

5990 LOCATE 4, 14: LINE INPUT "INPUT DATE ##/##/## ” ; DT* 
6000 IF DT*=” ” THEN DT#=DATE$ 

6010 IF LEN (DT*) <>8 THEN ♦SET. DT 
6020 GOSUB ♦GET. NAME 
6030 GOSUB H<GET. YMD 

6040 GOSUB ♦CHECK. DATE: IF F=0 THEN ♦SET. DT 
6050 ’ 

6060 LOCATE 4,16:LINE INPUT "INPUT TIME ##.##.#» " ; TM* 
6070 IF TM$=" " THEN TM*=TIME* 

6080 IF LEN (TM*)<>8 THEN ♦SET. DT 
6090 GOSUB ♦GET. NAME 
6100 GOSUB ♦GET. TIME 

6110 GOSUB ♦CHECK. TIME: IF F=0 THEN ♦SET. DT 
6120 ’ 

6130 HELP OFF 

6140 LOCATE 12,20:PRINT "SAVING "; 

6150 GOSUB ♦GET. NAME 
6160 RETURN 
6170 ’ 

6180 ♦CHECK. DATE 

6190 ’in YMD 

6200 ’ out F=0 then error 

6210 IF Y<IY THEN F=0: RETURN 

6220 IF M<1 OR M>12 THEN F=0: RETURN 

6230 Z=Y: GOSUB ♦CHECK. LEAP 

6240 IF D<1 OR D>Y (LEAP, M) THEN F=0: RETURN 

6250 F=1 

6260 RETURN 

6270 ’ 

6280 ♦CHECK. TIME 

6290 ’ in HOR MIN SEC 

6300 ’ out F=0 then error 

6310 IF HOR<0 OR HOR>23 THEN F=0: RETURN 

6320 IF MIN<0 OR MIN>59 THEN F=0: RETURN 

6330 IF SEC<0 OR SEC>59 THEN F=0: RETURN 

6340 F=1 

6350 RETURN 

6360 ’ 

6370 ♦HP. DT 

6380 RETURN ♦SET. DT 

6390 ’ 

6400 ♦HP. CT 

6410 RETURN ♦CHANGE. T 

6420 ’ 

6430 ♦HP. IT 

6440 RETURN ♦INIT. DATE. TIME 
6450 ’ 

6460 ♦CLS. M 

6470 LOCATE 0.23: PRINT STRING* (38. " ") ; 

6480 RETURN 
6490 ’ 



6500 *DSP. VOICE. FULL 
6510 CLS 

6520 LOCATE 8,6:PRINT ***** VOICE FULL ! ♦♦♦♦” 

6530 LOCATE 10, 10:PRINT "II VOICE MEMO" 

6540 LOCATE 10,12:PRINT ”2] CHANGE DATA DISK” 

6550 LOCATE 12,16:PRINT "COMMAND "; 

6560 RETURN 
6570 ’ 

6580 ♦VOICE. FULL 
6590 GOSUB *DSP. VOICE. FULL 
6600 GOSUB ♦KEY IN: PRINT AS 
6610 IF AS="1” THEN ♦VEDIT 
6620 IF AS=” 2” THEN =t«VEDIT0 
6630 GOTO ♦VOICE. FULL 
6640 ’ 

6650 ♦GET. YMD 

6660 ’ in NS 

6670 ’ out Y M D 

6680 ES=MIDS (NS, 1, 2) :Y=VAL(ES) 

6690 Y=Y+1900 

6700 MS=M IDS (N$ ,3,2): M=VAL (MS) 

6710 DS=MID$ (NS, 5, 2) :D=VAL(DS) 

6720 RETURN 
6730 1 

6740 ♦GET. TIME 

6750 ’ in NS 

6760 ’ out HOR MIN SEC 

6770 HORS=MIDS (NS, 7, 2) : HOR=VAL (HORS) 

6780 MINS=MIDS (NS, 9, 2) : M IN=VAL (M INS) 

6790 SEC$=MID$ (NS, 1 1 , 2) : SEC=VAL (SECS) 

6800 RETURN 
6810 ' 

6820 ♦GET. WEEK 
6830 ’ in Y, M, D 
6840 ’ out WEEKS F 
6850 ' 

6860 GOSUB ♦CHECK. DATE : IF F=0 THEN RETURN 
6870 1 

6880 DAY!=D+IOFF 

6890 Z=Y: GOSUB ♦CHECK. LEAP 

6900 FOR 1=1 TO M-l 

6910 DAY ! =DAY ! +Y (LEAP , I ) 

6920 NEXT I 

6930 FOR 1=1 TO Y-IY 

6940 Z= I + 1 Y- 1 : GOSUB ♦CHECK . LEAP 

6950 DAY ! =DAY ! +365+LEAP 

6960 NEXT I 

6970 DAY1 !=INT (DAYJ/7) 

6980 DAY 0 ! =DAY ! -DAY 1 ! ^7 
6990 WEEKS=WKS (DAYOI) 

7000 F=1 
7010 RETURN 
7020 ’ 

7030 ♦CHECK. LEAP 
7040 * in Z=YEAR 

7050 IF <Z MOD 4)=0 AND (Z MOD 100)<>0 OR (Z MOD 400)=0 THEN LEAP= 1 : RETURN 
7060 LEAP=0 
7070 RETURN 
7080 ’ 

7090 ♦CHANGE. T 

7100 ON HELP GOSUB ♦HP. CT: HELP ON 
7110 CLS 

7120 FS=DSKF (VAL (DRIVES) ) ^5 

7130 TT=0 

7140 FOR 1=0 TO N 

7150 TT=TT+VAL (KS (I) ) 

7160 NEXT I 

7170 FT=MAX. C-TT: IF FT<0 THEN FT=0 
7180 IF FT<FS THEN FS=FT 

7190 LOCATE 5, 4: PRINT " 1 INPUT REC TIME 10~640 I " 

7200 LOCATE 10,6:PRINT "DIRVE ”;DRIVE$;”: " ;FS; "FREE” ; 

7210 LOCATE 11,10:PRINT "HELP! TRY AGAIN” 

7220 LOCATE 11, 12: PRINT "RETURN! TIME=45 

7230 LOCATE 3, 17: INPUT ”REC TIME ( 10 ~ 640 STEP 5 ) ”;TS 
7240 T=VAL (TS) 

7250 IF TS=” ” THEN T=45 

7260 IF T<10 OR T>640 THEN ♦CHANGE. T 

7270 TR=T-(T MOD 5) 

7280 HELP OFF 

7290 RETURN 43 



7300 * 

7310 *TM. MANAGE 
7320 TIME* OFF 
7330 GOSUB *DSP. MENUO 
7340 GOSUB *KEYIN 

7350 IF ASOCHRSC13) THEN *TM. MANAGE 
73G0 1 

7370 WHILE 1 
7380 CLS 

7390 LOCATE 6, G : PR I NT " 1 MODE SELECT I ” 

7400 LOCATE 10. 10:PRINT "11 DATE AND TIME” 

7410 LOCATE 10, 12:PRINT ”21 TIME ONLY” 

7420 LOCATE 14,16:PRINT "COMMAND 

7430 GOSUB *KEYIN: PRINT A* 

7440 IF A*=" 1 ” THEN OTF=0:GOTO *EXT. SEL 

7450 IF A*=" 2” THEN OTF=l:GOTO *EXT. SEL 

7460 WEND 
7470 *EXT. SEL 
7480 ' 

7490 GOSUB *GET. DIR 
7500 FOR 1=0 TO N 

7510 FS* (I)=F4 (I) : NS* (I)=N4 (I) :VSS (I)=VS (I) :KS* ( I ) =K* (I) 

7520 NEXT I 
7530 1 

7540 IF OTF=0 THEN *OTFO 
7550 FOR 1=0 TO N 

7560 NS* ( I) =” ??????" +RIGHT8 (NS* (I) , 6) 

7570 NEXT I 
7580 *OTFO 
7590 ’ 

7600 GOSUB *DIR. SORT 
7610 GOSUB *TM. SETON 
7620 TIME* ON 
7630 * 

7640 CLS 

7650 LOCATE 6,6 : PRINT " 1 TIME MANAGER I ” 

7660 LOCATE 13, 16:PRINT "CLRI TO MENU" 

7670 WHILE 1 

7680 LOCATE 6, 10: PRINT ”PRESENT= DATE*;" " ; TIME* 

7690 LOCATE 6, 12: PRINT "NEXT = ”;DT4;” ” ; TMS 

7700 A®= INKEY* 

7710 IF AS=CHR* (12) THEN TIMES OFF:GOTO *MAIN 
7720 WEND 
7730 • 

7740 *TIME. T 

7750 TIME* OFF 

7760 YY=TN+1 : GOSUB *CNV. V 

7770 GOSUB *MAKE. FILE 

7780 CMD PCM LOAD SNAMES, TS 

7790 TP=VAL (K* (V) ) 

7800 CMD PCM PLAY TS, TP 
7810 GOSUB #TM. SETON 
7820 TIMES ON 
7830 RETURN 
7840 ’ 

7850 *TM. SETON 
7860 TMS=TIME* 

7870 DT*=DATES 
7880 GOSUB *GET. NAME 

7890 IF OTF=l THEN NTS=” ??????” +RIGHTS (N* , 6) ELSE NTS=NS 

7900 11=0 

7910 FOR 1=0 TO N 

7920 IF FS* (I) =” 0 1 ” OR FSS(I)=”81” THEN *TM. TO ELSE *TM. T1 
7930 *TM. TO 

7940 IF NT*<NS* (I) THEN *TM. T2 

7950 11=11+1 

7960 *TM. T1 

7970 NEXT I 

7980 *TM. T2 

7990 TN=I I 

8000 IF TN>N OR I>N THEN TIMES OFF:GOTO *MAIN 
8010 ’ 

8020 NS=NSS (I) : GOSUB *D IV. NAME 
8030 ON TIME4=TMS GOSUB *TIME. T 
8040 RETURN 
8050 ’ 
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0 *fg BASIC 0 mr, 40£ i: 7 7 4 a- X 
^4tIt5o cniiFA, MA-rffti:^- 
h ? ixt:^— r 4 y r 4 t'A So 

N88IT ; -1-S'ttt7 

MA0^ti, N88i7 1 '4 ^ t l'7 0 + 




N88^r°4 77 4^St 

* 1 1: L -C N88- 0 BASIC 4-®«J L, 
RUN ”n88ed. ip 1 ”© 
tt So 

^0A*i:MLTIi, N88- 0 BA 
SIC t IS] C * 1 S „ tz Af L , A 
Jj + OXIiSfetr, aSXSffliTfcfet'*^: 
snso 



AJj + li, Si:4 >t- h^e-Kirio 
•Ct'-C, ±*£> (i-^-74K tt-TS 
7«ci,'„ L7.:* f o-C, ? 4 7“$ XU, ITiEX 
1=4r«iJ^LTii*?.jEU'X»«rAJjtS**, 
a»C|TIEX1 : 4rffAfC**C,^S7j;X1:?f 



Bij^tsc t II So 



X68000l£J£i' ! 

I Xi:*-y^(rM«, PC-88 
VA t A* 

PC- 88V AX68000 li ^ t ' ! 

1 6EMiJ8M—%-fft 



PC-88 V A ! 

SB14 >-t- h*- Ktt, 

®i's* f , ir<xs <, OL 



IWCt-f, S«M>£^o X*0®^ 
-J60*»7-^nt 
UtiSMWlTi'So titf L, X 
$0*sli«ffl±t'li^rft4OX1:i:il^t', 
fis; 

fefe LSi':ii:, 3> h n-^n-F 
i-CXm^r.-sutiz t **-fs So 
UJ:-»-CU«*0*SttjlE//o 
i|i*0»»«.. X#0^«4<i:«r^o 
C0PY4f— %-ffl t, ^i*4>0R:*4■7 , 

y V^UfliJjtSo 0^*^, 

En«'jii-r^4a'o it:. 

-yi/a-Kli, t^'-C (CR t LF l£ 0 ft 
< ) x^-x t ITtfiJjSftSo 

^*LA:X*tt, f4X7i:774^t 
L S i 1 1: U S 2D, 2HD 0f 




a *** 4 rz&mmu, 

X*f£#©i&, r* x^l;l5]L'«BiI® 

•^7 5'7 , 7r^U^t:<ns(.B 
AKti^ffif^O. Lfc* f oT, 
^-C7r'fA5riLUi 5 ; i* ? 4 i> 

L, &#***— *trjELfc#‘&tt, 
fl©*** 5 ^ x^tiSi c t 1:4*. 

N88^r^^ii, -®0^l7-rBl 
LTfeffii5L, '*y 3>ifi{f®7->7°n 
- Kffi£*7 7 4 i; li^ii/f, 

i , BASIC 7° n i/ 7 A ©1#$ ® 

*01: f)jpjffl-rs 4. 
BASIC 7° n ^ 7 A fc ASCII t-7'LT, 

n88a?v *-nt*&*. s««*i*ffi5 
©Vo tt*4B#M*tt*tttr4 6.MA 
fraW+^SV. fcVL. B*fgJ:yi>-y- 
FA 

©I* 7 **$< T Ip’ i'V^> 5 . 

tftKlfi, PC-8800 V- y - x* {, M A 
®i"'>it'< 5 t, ifc®*TVi'f-iy>7 
flit' 5*o -CL 4 50V* 5 ? B*ff 
7 -7 ° b *ia*aA v o 1 1 v>i ih 5 *•„ 
l*>L*ftJ: 7 fc x 7 ° 7 'f Hfttt*'4ltti 
tfUBttftlM #tn httflg 

frttttLTIiLi'fcOir. 




FA/MA ®4- -if- K «: 14, 100 k @ i 
4*- **#A-tVS„ *0+1", 
*®* f ^5i’0tt £0*- VA 5 *> ? 



$Ml*t4 c> If, S t < ^<7 ^ x^- x # 
-*-#tt5V*5. * IT ***!**- 
*- KCtR^A- tltt, ^y^X't-X 
©*1MS<: * 4 c t I4'>4 < 4 1 'ttrv. 

&0|ffl7-7’n0#-.t'- Kfli, 
FA/MA f + *ft$C'<7 

^x^-x*- **£*„ 7itlSf0«ll 
t'^7^x^-x#f^4i-6 ; t C4ii*, 
w0V'^7’? hVt, Sx^/fT’Lfct $ 
U^Sr*-A.-Rj7s/a t 4 



<*#-<ITlEf9 4. 

FA/MA fm*’ IT A 4 5 t, 
7 , P/7AH^f^, l/xM-fibs. 

-?S'>ff*-*T'A;fc L, BASIC-r 
BSAVE ’’BACK”, 

& HF320, & H66 © 
t LTr'/f x^liflHf-rs. 

7t>75 

BLOAD ’’BACK”, R © 

t-Tio 

:nf, FA/MA 0&£*- Sr#f t, 
/<'^x^-xi|^t4j: 51:4*0 

SHIFT *l4* f 6ff*ur. **©&& 

^r-U-CKo 

$U:AoT I) c> x. tz <o, j'XrAf/i x 
^©■3-— X/f y T4 h x^r — 

Mfcffttfi yfcfttr. 

e^n +-0«a j p«& $■#£ i:*it 
*fcV'iJB5 A0A*»i:, y-xyxhfc 
y X t 2 Ujjrr o 

£ I) k {>,PC-8800iyy-x , 't:fei.''C, * 



-A*tt VRTC»jy&**r#iJffllTft6 
fiTi'*. jBjffl4^t**>J6O'0 > ©lf>^ 
t®*4 5>y'T'VRTCfiJ0Ii^* ? l8^ 

l , cpu 14 ft c> vj> * tea *■ 4> m i t f u y & 
A-t-t'x/v-f-y^t 
VRTC oft * &*■$— t'XA-fy®^ 
^hTvJi, 7-^x.y 70F3O2H C-fcx 
t SfiTi'So *** h*7 Kvxli, B* 
If BASIC 0i#-g-AF8DHf* 7, i Z U' 

4-sK-K4 , x + 7 
v L ASCII a - Ki:*«L, MrAA^y 
77i:t7hts. £ Z'CzcoT’af'y a 
fi4, «y &*■"** hA'ta&fcx.TC* 
;©*-f-7i: < * 4 5 i: Lti'i. :: 

f Jl^fct^y^x^-xa-Klit y 
fi-CU 5 0V. 

3?*®** AI4, :0/B/7 

L -C b 1 ' h 4*tt*£ y iiAfAT li L 



•JAM 



F320 F3 2A 02 F3 
F330 00 00 F3 F5 
F340 2F F5 AF D3 
F350 FE 01 28 18 
F360 Cl FI FB C9 
F370 28 E6 AF CD 
F380 AF 32 FE EF 



22 30 F3 21 2F F3 
C5 D5 E5 3A F9 EF 
E2 3A C2 E6 F5 E6 
FE 20 28 OC FI D3 
DB 0D CB 4F 28 0C 
IB 46 AF CD IB 46 
18 D2 



22 02 F3 FB C9 CD 
FE 03 28 20 DB E2 
F9 D3 31 3A FE EF 
31 FI D3 E2 El D1 
18 EC DB 08 CB 77 
AF IE 08 CD DD 45 






EFFE 




ORG 

ASCIN: EQU 


F320 


F3 


DI 


F32 1 


2A02F3 


LD 


F324 


2230F3 


LD 


F327 


212FF3 


LD 


F32A 


2202F3 


LD 


F32D 


FB 


El 


F32E 


C9 


RET 


F32F 


CD0000 


INTNEW: CALL 


F332 


F3 


DI 


F333 


F5 


PUSH 


F334 


C5 


PUSH 


F335 


D5 


PUSH 


F336 


E5 


PUSH 



0F320H 

0EFFEH 



HL, ( 0F302H ) . «»* 

(INTNEW + l),H^^:r TNEW+1) 

HL , INTNEW 

( 0F302H ) , HL ' cintnew** * v 



DE 

HL 
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F337 3AF9EF 
F33A FE03 
F33C 2820 



LD A, (0EFF9H) — 

CP 3 1 3*>b(f, A2j4L40)T, 

JR Z , POPRET 1 t *<•' 



F33E DBE2 
F340 2F 
F341 F5 
F342 AF 
F343 D3E2 



IN A, (0E2H) 

CPL 

PUSH AF 
XOR A 

OUT ( 0E2H ) , A 






F345 3AC2E6 
F348 F5 
F349 E6F9 
F34B D33 1 



LD A , ( 0E6C2H )— i 
PUSH AF 



AND 

OUT 



0F9H 

( 3 1H ) , A 1 



ROM, RAM*— KtTS 



F34D 3AFEEF 
F350 FE01 
F352 2818 
F354 FE20 
F356 280C 



LD 

CP 

JR 

CP 

JR 



A, (ASCIN) A*Lfc*-®ASCIl3-Kt»f 



1 i£a*-K0>ts, 

Z KBACK kback^ 



Z , ABACK- 



KTtt, LT® < 

*®#-&-liABACK'' 



F358 FI 
F359 D33 1 
F35B FI 
F35C D3E2 



CLOSE: POP 
OUT 
POP 
OUT 



AF 

( 31H) , A 
AF 

(0E2H) , 




y*u*- KS-tfctt.tr t 
a»RAMro««st.fctttrt 



F35E El 
F35F D1 
F360 Cl 
F36 1 FI 
F362 FB 
F363 C9 



POPRET : POP 


HL 


POP 


DE 


POP 


BC 


POP 


AF 


El 




RET 





] 






F364 DBOD 
F366 CB4F 
F368 280C 
F36A 18EC 



ABACK: IN 
BIT 
JR 
JR 



A , ( ODH ) I v* 

!* A I 

Z , BACK nztixi'tiuc back^ 

CLOSE * -5 T4 ItiitfCLOSE'' 



F36C DB08 
F36E CB7 7 
F370 28E6 



KBACK : 



IN 

BIT 

JR 



A, (8) 

6, A 



SHIFTS -*'}¥ ZtlXl'l i y X 



Z , CLOSE ITS <tTt'tl(XCLOSE~ 



F372 AF 
F373 CD1B46 
F376 AF 
F377 CD1B46 



BACK: 



XOR A — - 
CALL 461BH — 1 ‘ 

XOR A 1 

CALL 461BH 1 



77*-ai **m» 
7 7-4*1 x^siii* 



□ 



2 h®a- K-C-*S#lSfc*>, 

+ o.-*'F>B2 7<-f KMi&ST S*®*'** 



F37A AF 
F37B 1E08 
F37D CDDD45 



XOR A 
LD E , 8 
CALL 45DDH 



I ti-'W7ri: 
| S-fe-y Vti 



F380 AF 
F381 32FEEF 

F384 18D2 

F386 



XOR 


A 


LD 


(ASCIN ) , A 


JR 


CLOSE 


END 





50 



part4 00 



AVtWW'KT— / 
FA/MA/VA 



^ €> 4 

PC-88\4^0Up Grade Board 

Kt*7-M«-K*3IW5 



y 












p .c : 88 yA®tr^^^ s^KcourB, ’ r oh i 88 j’ i irirc 
u as u e *f , iz 5 l Vr t \ < 5'#® ms'y 

* ai ’ z ©<\-=; rje^'u ^'^<50 ® ii® *7 y 

O'CWjy hOxip'i^^B c »s»©«sc^^'iy k u s'*.’ 

iC< |S158^-^^'<rK'<^'u'„ 



/ 






VA-*©» 

PC-88 V A ixX*' c, to 1 #.®f®, 

m*»±if tni it. 

**©^»65 , 536fe|B]0f ft ^ 7 

7 4 v 9 t^ vr*auim**MmsvHc 
t'.VA C'> L t* i> *i*«r t> o -c I' 6 Aft 
Iit-n:^t'0:t-ru;5„ ^'— K® 
14ill;U'5itrt>ft<##i:it;*ftfe©r 
T* f , 'J7 \-V*7(DT'S.*m'''X'.'tz% 
*ni:Jt^, NEC® r 7~7 7V- 7- j ^ 
7,7 A h® r Z’s STAFF Kid VA j ft £ K 
®ifti' fc®* J M(i.'oo* i) i t„ ztic,li 
va ®ttneft^*-r* i A:»uit«te-c'. « 

i'Cft-n:UJWB**l*+*t t IftftSt 
*Ci.'W«ft'£ U'^CftoTHt. 

* 1*6 tl’^r(ftttk«(ttft#*Tl ’6 

VA 0 ^yofl-SK',* 

lifti'trt i 5*-? 

tr^Tit-K • 

r PC-BBVAllj 

^•IliVA®^7'i'3>, K 

rpC-88VAllj (¥*@) ®iSJfli£i:oi' 
tMLfci’ kJBi'4+„ 
d ® k'r'* sK— K ii VA x 

n?H:ilf5:ti:i^t ftSB®fc' 



x'4-BTtgCtS VA#ffl®**- K® C t 

r-r. 

VAfcfaft*,®#, CH*»6»AIJ;5 
ft-HH:»ffl+*fc*c4i'i'^-^kft 

* - 1 uiew-r-r . 

ftfa, k^t^-K®«*t®Sr{£tt*g 

vm^-cmmix*,*) a-, 

■rii, t'r't **- k-t ft c * r -r s s ®-r 

L J: 5**? 

tftli** <#ttCJUT© 2 o***(fC, 

n*T 0 

©,*—<- 4 

®lit*7 , t®B(S5ry ■>' * ^ ft ftjbBft 
ll-CJfc*>ii*, VA-CW*©#ig%-^ 
i:Ut„ 

® tt tVt®B§ c VA t'teo tzXf 

fli, :<x*'iic®2oi:oi'ti.'<'3 
*>©iSffl«%-*lfft* f c>^UiL-!:i.^ 2 L 
i 5o 

VA £3g|&i:1£5 t i: < b*‘ 0 i T* f , 
X'aT’y LT Xy7Av7 

X-T'A 7xr!&*ffi< CLtl, 65,536fet 




¥H® £f*#-K r PC-88VA11j 



i' 5®*ftfe»:?rffii' - ftt©li*£ft £ 
t-rto fie*0'*y ay 1 151 I'i&fcl'li t 
T hit, 

at«5 £•*!** 0 i-ti-A**, 

4 * js ir if s ® i* t o ft i ' ft i > ®r i* 

fti'-fli ?*>? 

:®«7< 7*ttfte©*fK*9Mf3«- 
s®*^'7'^t'^^ 4 x'nfig-rto 
fj|^®16fe, 256fe, 512fe07 1 '-> f ^^ X' 
t ttittt«:ft&fti’«ejjL < ^Bflftfflft 
* ? ?X t ) &*> i t„ t'r^ftx^^jSiSi:^ 
OiiA//fc®klitAt'll* , ft<, iS-T 
1 5 ft y 7 » ftiiifft* 1 ^ 
L-C;®¥»® «t 5 ft^?f^77^ 

73Li*A ft ? z (Dili' 0)7 a x 7 A-rSfi 

cjnx-rsito 

:wt’f*f^-ix'®bf, Lfci'fc 

;^rt„ 

<• ®*^J 3 L to 

ft fa, 4*0 US' 7' f b© r Z’s STAFF 
Kid VAj L to 
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5*0 



Exam.1 

V^S^xPiZcfc^iij 

HOW TO MAKE 

(Dit, ty«'-FH'npnt 
i*e>, y 7 h ^rS’jtt.XifT'^'f 
yro^^vKtiic/i-r 
(Dt'f^^S^LT, g)cU.'^* j ai-C^^ 
c,r-s*'t xiit, :o-y7i-0^ 

tl-Ci'^DxO^y^^'j -y ? L 

it 

®t£itimXT?to it'WtyAo&m 
LKZMVlmi-tSZ, 0©Xfc**^T 
if&dito zntJttL'im^s^B 
iCocot', mzi. iU&te'.'Vl zhk 
SLt^lf-Lti .'$it 
a±(Dz 

:f*®0 i*>U') 7»U i * To 





5*© ©4-yn^7ACJ:-pTA,S)fct.ro 5*© ©4-yn^ACJ:oTB»!i''»/!:t.<7) 




IT-, z © J: 5 Ltz i ©©it't 5 © 

fHt* lofomi:St LTi'ltif, 
SFXB*iIiH1e4 z IK^xmt'Cto 
h u /_* fct,' h <■' h *#•« L -C *T < ATS i' 0 

Exam.E 

MLj»It3 

HOW TO MAKE 

S^0 Tb 7*5 a t; i -5 -ci^in 

xt s nmfto 

^H©®©l i, tc©!^^©*- BASIC 
®7 d^ 7 M:^-CA,< L/zO (¥*©), 
sin;&-7'(i£ 0 (^Jt©) L 
fc {> ©TT. 

Z©J; 7 i:3yt p a-^r®7n^7it' 

jdxt 4 1 , ih- 7'^ &«o a- am 

Hn: Itf-tTSi To 
Z a C, ©i^ t> r Z’s STAFF Kid VAj t: 
J: o 'Cr ? -7'7 A X'LTi'S ©IT, BASIC T 



^©i-ZLOAD.BINj 
i\.' ! j-7v?'v i**femid'ito t'n 
BASIC ©7°b 7*7 At'T©T. 

4 fc .&<•'£ To 

Exam.3 

t^TT 

HOW TO MAKE 

j£^, 3 D t i’5Slt Af 6 L < 
<4:0, ^Iffl©y-Ai:3D4 ! lJ|l, 
t'r'* ;*M 7 tz fe 3 D ffl©#»4: k ©* f 
* L7z„ 

3 D£j?Tz©liftj£#^7J1#'r 
L tz **, z A, 4 i:# < *&T 4 t i*& -» T 
u^A.nL 

a ^ k'r'T © fe © li, 
O^fiCJ: 4^7—03 Df, 
*****lzfti4T. tzt'^BItt, *ii 
0>W©fi « »: * fc *© -ft *» ✓* 5/ * « 
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i Lfc. 

f»*. ^^fcf^fcc: tftof, # 
«©KWi:A0 i L i 5. 

(Dt'ft tf-Kir-tvn yj'L, t 'ft 
* S 9 %•*'- F© t'x"T A**T- i: o fc 

sr. b**.7«r*-fc_urit 

©t?Mt5'T-p'/l, 0l©J:5i: 
2 O0^i6]*» C, n-^-f zf x' L, 

fc- ftF-ftr’".! xyc-t — fL 2 T. ;® 
tS, t7y©ii53* i $b(ifci.-J: 5»: 
ft* Lit fcffifj) 

<3> BASIC fc&gj L fc*, 

H ) 4- RUN Lite Exam. 2 fc ft® 

®&i: pi ft ©Sffilffl© fc b ©if&4M*ii 
A, fefi£0|8g rjj %-AfcL it 

x7i:-fc-7*Lito t®0 

y?l>0^, 1 K?/f T'CS'X^Af 
4 An, ESC *-*• if L 4 *5 c, 
RESET *if LT-fc-7'L it 
©®fclH*i:, 3*®IJ:fc 5 — #0*&4ift* 
a*, r 2 j 4 A# Lit. 

it 

®fc LTC0 2«t0^4-ltti:*ia^6t 

niff &***<> ft 

-0®ia'g-6t0#fficii2 t fa 0 * D 
it. 

lott,. 2«C0^0|SlCffi«0K5- b«r 
ffif. L-g-btT, 

U*jRlfi'&, INtt’t’ilM'icfftft 

fc 5 low, *4 V yremtim. 
t@iiy7H>i7 owffi±, *#©# 
ttf t^-coflafc'f s t l i 5 or, ; 

0#ftfc«fflLi Lfc. 

JaTCt0***lJWILito 
®y 7 b V^TSrismi, 02li30i 
5i : b ->*#!> it 
®*«HJ0fc***&Af, 0 SO&fc-il 
tf, B2©b-5'*MB±#:i;*»ltiT 
®^-a-07i3y (03A) frA-oX, 

■H*50K*hTur&Lit. *Lt 

J&© fc 0_hi; =t kf— L i to |5] 

fltiay (03B) fcflSrjtfcOT* 
M?0Ti:alf-Lit 

©■ffifrjcoeai: fc e l, -£*;&©£* 

Bt*&A,f O#0-fe4*tf, 030b- 
ymi:i‘iiit 



11 f 1 

L^J tewi* 

*>7ft«(2) **xfi®(1) 



0 2 0 3 




□ •■•6(67535) ■•H(0) 



0 3 A 



0 3 B 




@0#£l&i.'fc3fcf- (^L<liV7h0 

■ 7 - 0.7 ^22^— ’>*) ®0i£ 

0TJffiT±T¥#to t: fc -o fc^ffllffl© 
B«rfr#1'ofi«ffl0Bi:®faito fc 
Ltiliffifc’jcO&gi; fc fc' LT^iilf^ 
Aft 

r Z’s STAFF Kid VAjfrfc-afi’fci’ 
■fir.abt'b i: < i>*>fc initA**, ^ 
fcWO&fcifi&lzMta'g-b-STi'ifc’tt© 
£fcft. ^^HHH0fttLLt 
li, *ffliffl0#i'ii^* f , I(IUil0 
iJOtn/NviriifflctotHto 4 
LT, ^ffliJffl0^i.'i^* J , KILJM 

0fi'tD^y^ii:fc^-c^ ito 

VA Srlsgffl L -Ci' i t* f , #it L 
■Cl- ' S fc 0 4: & 1SJ-T fc *£ Aft „ 
HftM'^AfclA* LT3D««Mrflso 
T^-C < fc'Sl'. 

w ti i f c*a^ L A* 3 O 0$J0 (i *• c , 

mm& > 5 a. V- b S ^-effifflt 4 Aft** 

ito 

ifA'$rJR*>i*Lfcfc &i:fc 
0f01flif 5£fcS*’fc, fc'x'TJif 
&SLT.SS £ fca*f& it (¥#®©) 0 
fco&f, ^&Hbt;k^5ra 
t/;^0y^v^- bits: fc**f & 

ito 

£5l'ofc, 0*ft0±-!r0'>5iV-iy 
a y * f k'x'T **- b'uiot nr^g i: & 5 i 

T. fcfciUf, 



e i:&fcf s c t fc *tb 

ft. 

*i£0* *-*-s>c»ftS*l'Cl' &iK 
#?A0«iS«fc, i*S4f^t^L-C 
VAi07-^!'i-/'aVirJ'Uv 
- b s-t-ci'ito 

w 0 i 5 t'ft r-y 9 A xt'iif fc 
VA 0iSffliEH* ? :A.Ic i:A* { S ©ft. 

t'ft »r® «: 

fc 5 lo0ffiliix-^-i 
t»WXft4«®fto 
C nut, VA f 1Z?7 7 >l -y t x L , 
ft&i'ZAfiLtzt'rtcDmffi&mtixm 
*8*6«®fto 

fc t i- If, S L fc k'r't Off Si 

U^f'f b^OX^^toltfcD, k'ft 
0® < a rffr©±f 7 - 4 ®*> L fc 0 1 5 
£ 0 it. 

fl|^0>-' o y 3 y-Cfc x— x' 
fc fc 0* ? * 0 i Lfc**, t'x't 
i:7ny7ir-oiHlS0fc0ii*iiUi' 
f, r k'x"t0fci«)i:^' o y 3>^fijffltS fc 
©j * J li tAt'f Lfc. 

U5i ! , VA i:li r 7-> 7 v— v-j 
ti'5y7b5x7i ! * OitOf fc© 
X-,?-^#-7li^fot7-^ fc 
k , x"t0'&A4^Ltj‘w fc fc «mfc©fto 
fli, r 7-^7w-7-jfcf,fc/7 

7 a -y t 

t n x - ^ v /v-cmb ntzmeo 2ofc zzm 
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B- E- 




Exam. 4 

HOW TO MAKE 

imm vr* * f «H« t: * *■ i r-c, 

Airnuz*. 5 -rto 

ztutt 5i'ofcfc0$rll*t*|Ri:, 

T-t'Cft'i bA«rottS*L^#-rtc 
f£{&J (^*<S» tt, &A 0 X+-JK 1 T 0 

t'r'H-C, h^4-T-^-'>3 V-C'o 
UAiOT'To wftcli, #£fflfciit®ffl 

i> h k u vr* i:,si'gi'©r-^-i'9 
vfcitaA'g-h-tf-T&itfC t*»r& i t, 







¥*®> PdfflR|:g 



SSSSOD^VXF 


• 


u— >a>rs»ufc 




VA OXJ^ZHvOX 


IS; 


HOW TO MAKE 


iSo : - 






;;m i'i 

t* 1 , VA©/77-('^Xi , l’i'i:t)1- 

nA «> 0-r* 4 ••mewt 6*w* 

Lfcl’ tsi’it. 

£0, * 4 -*-***? U* 

0tt<r««L4l./i. *© 7 °n*-:x g v 
vr* o-« u va rfts* i iz 

bfiTi'it (¥#®@®)o 

C Hi*. r Z’s STAFF Kid VAj tT^o 
TSi® l, fill: r 7 — ^ 7 v— -7— j *■ 

>#-xuzb 

(0-c-rmm-as.vA-aiUi, i 

i'ttn-ri'it). 

'f-yfvv^-x 

Lfc. 

U>-L, ZOWMftfci'J J: 7t:, 
yj-jfj-— zcDstyayf, f 

5 i 5 nt^fcOT'To 
VA tt, iniT'O^yaVkiiO'tl* 



COL-COL- 1: CLS 1: SCREEN .( 



39.199) , BF(O) .AND 



RESTORE *M . CODE : I 
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5ti, frKZA,, -?'>>mi'‘' ! )mM, 
ii’tltiHti'i? iii? 
TVO«(0ir2t/..'^\ k'lljtWs.JZ'C 
-C, I? < U7 5-^5/ii: 

*ttiv»rur. lOBttfa, 

©liMi'fcw t*s itt', g5i'5i©4 
Oi’()i'/i.ii'')O-A0tM if Bo 
r Z8O0 > X'ffitt > 

*-r& 5 Alil*o & 0 I'oT, ZtmMi 
1^11^7 '7 ^7 L *> ^ I' it, t »:#*<, 4 
AU&b*>&4i'a4fc©fc*K, BKft, 
5£®©v j/ >fgfgi$* z n*' c.fi-1' i to 






3:3% ^VSIbti 



aa** 




m%<D75Qft£>(m*#z>zmmz£9, 

m\£@tt©7^>l§IgjI£ftl\3:3o Z-80 
<DZ£, tfwh ©Z£, 



£<»]BS:l\75££©£tf>IZ, #Hltt332 
351*6 

3, ft#3s mm 

<£<*l\ 0 S3r*&¥MlZUtffc>tt6«:ff 




i-f, r'^^^CB-rto nvtfi-* 
tto t l-cm^xz ti'5oii, Mia 
7 , ^^fV'ti'5©li r *5c 
^0j ti'5©* t x^03t®Kt't*'?>, J8'J 
i: 0 *■ c> 5'Cm'Xi'X t,- 1000*- f. 198 
ri&i' - c i ’ x t> nr***-- ttJtii’ft i' a-tT 
-r* f „ *<xi'i*. 4 ■a' o t l-rsn'-a'S 
or Li 5 *‘o 

; c-r^t 5 o**h 7 >s>x^rt. 
^unu'-rt*'? i^i'-pu^a 

li^i'-rtio BHrJltiMi’o £0 
Ai'no«f»cae0if»6ii j ?'6#i''c*8 0 
** h imxnz^&x’-t', 4 a 

«f**tt#«Boisaioj:5t:-rb. ^00 
irc£ (£5 LfcfSUX’, ®W&¥<D 
m'-'UMs.zczmrxm.'ii-c, 9 
i>'Ci'4&l*ttH'0rt) Ctt*«:5#^ 
h0SM4A<xf if& i to d^HIKO 
«jsi:4 6fewr-r. U-C, 

t-rnur 

1.5^VH:tHt). ti lBj£li5* 
A'Hzfco-C, o± D^fU^ffiTSfcK.' 
pfcltrttao AAi:4AUfco&»'4i' 
t £ 5 44-tTLi 5o w0t&B*(:liS 
m* j ai-c £ i -tfA. 

AjStuo4i>ri’fc*SUrP < 1-4, 1.5 
stt* h £'0 4© 1 *> huts, t £ 5 
4 4trLi5o ^-oisro 
T # *C, 5*>H:4Ufto A.&SrL 
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■3 tii< IT, 0.5, iil', 0.4, 0.3, t 
LTi* < t, e®jST'B*li®fn.* 5 .t.i:ii 
(lot, 3?&0i:&oTm».*Wj:< U 
Oit„ ti*5etii, t&6i>AP r.'M 
it t 

i -K^x, *«n r'>in< itzt'ux’, n i 

p ciififi* 5 ;: & < ti: 

ay t°^-*li£^**£g|5, z<DVy> 

ft i i* 5 i O X f S -Cl' * -To 

o* 0 h 7 V->*x*®c©t£Bir*'JffllT, 
tAfc*>0 
zni:$£^Xifli'Xt .'6 

©rt o 

01 h 5 >i>A?< 00 g &0 

+ 5V • C 

' ' B 



a ° — 0 



ov ifrr 

pi® w t & y— h ti’i'it. eerii 
mfUt^OF’JieaAifclJT'LT, H 2 C 
*®f>o t t#*Wii 0 lrwL 4 t. £ 
A& fe 0 lf*>yT'li*L** I b**&l'T'L 
* 5 **. i, ee iffto: 

HAT < A'S i*. 

£ 0 T- Hi NAND (tVF) t "f If n 
i to AtBlE 46 i:t A* t 

». ti’Jilttoi D, t'%C, 4 1 lift 
o/:t^i:, CfOC&ftit. ST, £ 
ft^&AC&SOT'L i 5 ? 

AR* f t'*> c, I lOt SieffiPliO, - 
b%®.t>-&b&Z> ti'5A&£ Lt*lT$X, 



At; Llf, 2jSft®£LIF?cATi’5®tt 
Whet'S it. 

AP® lot: 1 i\tixts< tflJRPliJE 
l#©igm* 5 tilT < 5 , ti' 5 ®fetr^i 

to 

APAi’l 

TAP B** 0 ® t It:, J£LSC®^* s ai 
Pi:*Jlft, APBi'U^IJI®gfi ! 
aj-C< 5 , &ATi *5 0 t>!!Sl&"jm 0 T 

to 

5 (,i:S 6 i:, 

T'f'-^A'oTietfcLTfeltS, o£iM 

*V Srfltf£t*£ t kTS s®Tto 

rto iy's'sx 

v trftb, ztu>m 
^Tay^-^CiHto £®i 5 
&SB#* ? tU ^Ti’ibltT't**?., =>V 
tfi-*®l*|{flJTlim*‘L£SI5, Oil 
®fflA^ 6 -tir^*g?nito *dii 2 it 
ttOttlfftOT'to 

ria, 2 *st<ya 

■»^y***ffiT < 6 i $ (Z£'-?2M&L 
<.' 5 Sg* ! M** 4 xs®li, :®i 5 i: 0 t 
i tsit(Dmftx'&&mmt nzuz vum 
Li’fti'AafcOT't. T*li, 2 lift t if 
t' 5 l *5 fe ©ic®T ' L & 5 **o 
ft A* *> ** 1£-3 T i* S lOitltriiim 5 0 

*• & 9 ®io t i»- y * y i to o i t> f> 1 ** 
AS < , liH 2*»ASi\ ti*5ft* 5 

10ffl*4ATtfeo t-***, 2*^0® 
S?i:litt^li 2 oL**ii.'. Oil. lli 
oiHfc^i'o ztit*\iit‘ib o i-a-Ao 
3 o, ti’ 5 ft«r*t 0 li£ 5 tfttfi' 
i*nn. ft A *> li r 3 j tMIllfb** 
Ht. t £** f 2 jtft® 1 S:?fP:li 3 t <■' 
oft^* 5 *!) it A. 

i zh-C, io 1 1* ? fti:oi'Tii, in 
RffiStSX^SrftAHiSfly KA 1 
©<fci: 0 £*S£'<T<.'*bllT'to 
li, 9 ©&(:*& i'fefc 3 it®t:;$: 3 : * f £ 
oi-a-A**?,, 2o©»^^ffl^^n.-tA, 
■i 5 I* 5 t, O&OTto 9 ©ifcli— IN'S 
I'OCtt'lt, 1 13 £ b'tlzl 1 1 * 5 L 
U0±i:, lH«r**t* 1 fro II A i 
©^©Tto 

c n t m t 2 jsftoiltsii t* 3 1 



0 2 >!r-t®«,t ;0 

:=[>- 



A a ► W p 

A B 

0 0 1 

0 1 1 

1 0 1 

1 1 0 



i*5»m:i*THt. 2jfift©iit 
5 ?Tf>, 0 li 0 , <fcli 1 o T, £ ©ifciflO 
ttS ©ft. 9 0 JfclilO**S AO tH 
A< BltaaTto 2 iS*fc©-t«:ffi© 10 li, 
10 <fct:AS<.'ftT't*>ii 1 tAl ->0 r 2 j 
USA 9 it. 

t4 tifcPASi'Olilltfc-aT, Tt 
**6«610JHa©3li, 2jHSc©WTli 
iit^L-d.'5 0-trto 
2ii»liHfri:0 t I02o0att*‘ 
L i -a- Ao ft A i, li 1 tfrTlOfS A Oft 
1=4r*-9Ti’«0i:, Tto HfrTftti t 
0Osa* , 'l>ii'A»!)i:, ISICftfrlO* 
ft t 2 jt&r* < t , 2Hft0li5* 5 WT?f 
?tzc>i--£ <fi’it„ *li:t©«l^?r 
fLHAo 2 ftftoTJBi'* 9 S Ofti’T* 
Li 5. iniift^OFplSTt* 5 , tfrftli 
lOitftcJt^, »3«i:«C^it„ 
^w-riMf']A©* 5 16 j 6 ftA©Tto 2M 
ft** t lOUft t **, ■iOfSAAi'lift^L 
4tmif*«>c.<xi-a-A„ A ** i: li £ A U 
©fBfWfi, oXAb i'4fL i 5o ter 
I'ftb. 

• 2 it&£ 

A'i'C.AAAOTLi 5*'o Sft'itfljn 

s-a-si 5 Ae tf-fti'Tii^itiirAo 
TUT. ST, bS£ f> t' Lto to 
te£* 5 , 21iftli^' o 0' tl6Hfti:^ft 
ti:t* } TJ, 16Hftli^^'V-?-7 t 2 ifi 
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El 3 



*1 lOii &, 2£&, 



*2 losa, 2 ttft, isitfkaiBBffattftflt 



ai:**f*$ it. 

:<itt, 2 jt& 4 $fiT'l 6 j»ai: 4 !> it 
*•6, 4«rCrtc«tlWUil:L-Ci'WtfJ: 

I'O-rto *1 T'loitaoioooa^iia© 
llinoioooi: 4 £ 0 li, i-e / 1 

lit', 4 0 2 it&a* r 3E8j ti'?16iifti: 
l£Z><D\m^-bt"9 i-to tttl’5i0 
0 , * 6 «* 0 «tttt**f'+**. 
-3^2 jl&0 o *> 6 4 tfr i -riiiOiiS: 

% 0 4 1„ T\ 0i-c,9i T'OlOffl©#^ 
t fOilCAi'C, Fit'0 6o©jl:^ : ^S 
TT, **i*a*t LT«fflLti’S0r 
t (S 2 #i)„ 

*j£f1® ! «3SS 

S-o§r, r-h0t-*tri«.BBLiLfc 

imn, 3>tn-^04 j t'ii-tf-/u^* 

i t oom.z.&bv-cm'-'ti'ito t+ 

*n, t'n^n-cuia-c'i'i'it; 



fc^rs-c, 2*auft*4 

m tl*a>’tfj^** , «yST'S4i'i0 
tort, +4< t t+o&jgT'i** 5-r 

to 

r ABntj ti'S^Hi'a-sT, K 
ri i feWPWft 4 t' * 4 k t *> 2 Jift i: iff 
* 5 t 0 3?*^*LTi.n-r o r ®i#^4,*> 

4ATi'5A4£«3^AT't* 1 , 
niiSfcoti’4 <t 5T\ **i::*4*# 
LTi’it. :5i'-9fc4 04‘ftf-f'*^ 
4, t I'5 0liaf4*t'*sg|i: LTAft 
uam’ttfti'Otr-f*'. th r «*i=j u 
<% * 5 1 a^or-r. 2 * 

Si:t5 t**i:*» < 4oTLii', + 

i64i’6U% t <■’ 5 0i*t>*’rj T S T 
i'it. 

irot, 4fc^KfrLTLii'*Lfc. 
*7*7, ti:**< 2it&T't^T*g! 
LTi'S ti'5**tt. 



11 01 01 02 

u u u u 

11 + 1 



gfln 2*ft-tw ti’5K40ft. 

®1+1 ©StWS? 

Hlr+* s r &j T* 4 t S UitUftt t' 5 
i40fLj;7. l + lOff-JfT'* tUf, 
r l t 1 trfclT*0|g*«r«itTfaj 
&At>0w*T'ii4 5 4 !> ito 
1 + 1 = 

tLi+fa. *fr4at'«+t+w*e3 
4 4 + Li 7 **. 4 CT'ttlO*aT'*i’T 
I'Hto its, 

+Lj:7*n„ 2*akioaa4ftt'*4 
ti>7^t+, **tti:tt*fc6 4i'T'+ 

ST, r JEt*-j 4 r 1 J, r *S£fr*i 

**j:j * r 2 j ratti-mr, 
1112 

tfcoitfe. :mt: + + 

^**i J t»AT'ttWJi-ti-A. 

t££T'tt|*AT’<*fSU', 
£5*6 3* t'OfciST'f. ?t, : 
OH+T11+ 1 Li 5„ 

11112 
ST, 

1 +11=TL i 7*', 1 + 1 + 2 tta» 

uii'itho ittitiiv. at a* 

st, num. 
it, +» 2 tfrCm *>**., ti'i* 
fci£4£Dit„ t4fc*>, H34jlT< 

AfSi'c 

i n-4 &a t ***iia.t 4 ; 1 4 < a 

tn t^rsito 

Li'Ui'L, 4 0]frt£T'li3tfT0&*- 
a 7 0 c-frfrfr 3 tfri: L 4 It WJT4 6 +, 

4 #4 6 4 Hfi: + «***«* 0 ito 
Ui', :0i+T«llfcf>^i:A^ 
iHffa**j*i-rrT Li 7 + 14 :* 0 i-e-A. 
*>„ 1 1 ' 7 fcHT'Hti'J: i’^TtBli4<-'T' 
L i 7 *> c 
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r IDj 

::f, g$t 4 cd* { id -ft. 3 vtr^. 

id u r iasij^j 

4 cMtt o flt&C E -9 t©l£SiJ+l*fcfFaE, 

ttAE, t'ftfao t\ w©ID^ 

5 4 < fcJLtf, 9 9 li?©|HM* 5 4 < W 

Dftt/ 4 C: 

4 A* 4 tz, **©*&•*#*. 4 1 o 

1 1 + 

E#-e-inift*A», ftuAfa 4 ftE 4 nl»:s 

ft*£ El=tt 0 it. 3tfrA'*5ft*4#rA' 

*$***<!> r +j 

CAfaA**ft®Mtfft*Sc-t *4 £ t SrSrf 
©-ft. o | d , i cd r +j ft* r J£tj E 1 ' 
7 *♦* L t, &i* ; ; 4 -ft** 4 E i’ 5 
id, *M*©«aw«r*fcLti' 40 *'t. 

J-CST, ftt'tfr-frSr^SScIWUri’l* 

?ci’ti’ 5 c tr*nur. r +j**»t:/.co 

tu i' 4 t*’t«*EHejl 5 i;lii ’9 
4 tA. tz - c , ftoacii^rtfcofflw 

* i **feIiIt '*4 0 *'Sr 7 StIDSro(t 4 c: t 

i:Uf. ::f, 3 Srl«T, 4 Sr 2 «r, 

5 * 3 ||f 0 *flSrjRtfc 0 E L 4 t. c© 
E*. 11+1 ©tUftt, H 4 ©J: 5 i:*t 
c Eft*-r§> it. fa, ixte # 

m-c LX 7 o 

St, zzir r**©j; 5 &«-*«& 

a e % < »©3Mtf t -r 9 5 ± 5 4 M** L 

t§>4LA. 9 &i:£ £ rift SSL Sr#*. 
t*4L.t7. sytf*-*t'f|-JM»*ya 
©^•«r«tL'ca»», *ftsr*fc*>*t£ 
t c4ots4s"4/j:*a:JS**t'S 4fe»tf, 
i®w t^jccMftorto 
r ARflft*A7j LA ft Sr 2f£i: Lt^/jxL, 
*ft£il&Oigtj Ei’5W*Sr#*.t*4 
Li5. r, ££t'tfc*rAi:**lroit 
#P A 4 Li 5 ft*. r Aiat:*!cSrAftt t & 
7 j©St 6, ft* l tUtt 7 , r ft*LT*^-r 
4 UE**7 Lfci’j Sr 8, r 4Mpji:t>Eftj 
fc9ELt*4t. :©u, iOMlItt, 
H5©15i:4!Ut. £ fa It 185 *cr » 
iLfc. St, ft i: 1*2 fci' 5 **&«(: 
2f£fa Ltl' <, ol 0, 2, 4, 8 i* 
Li 5. 



327328 ? 

5 * 6 * 5 * 4 J: 3 ft fa. **H= 6 E 6 T 
Utt£ 0 *Mfi£fc£ 4 ****fflt» 6 *i' 

2 L/C. 

PKb^diT-^ 

TKvxof, * 0 , 7 Kv*« 07 K 
wxoct-tr, trtft’f» 0 i/ct>i*^/irAtt 
ufojKftt'tto-ci’i-ro I’iMflLfto 
"Ci'* 0 ttWS©»Bfi:irfafti'. ti’ 
5 ^-rto 

6< DiZJ * y $< D & J 9 ftrt >6, r TKUXj 
Sr«i’ 4 t. ^ y , -3 4 *>seii* 0 ri:tt 
1 o O t o t: # 4 f-ft* 0 ft- 6 NBi: o (/ c, fat 
l’t, *£p/rSr^t 0 t:|*£faSrffli.' 40 -f 
to c/itart. 

^Sli 0 Sr $?■* >f©^ E L 4 L * 5 . 
Ot:tt< 2 o©*Sr 7 Kv'XE Lt, t: 
t: s?ir yf Lit. tit, 

7 Kv'X 012345678 
7*~& 327328002 

fa, 7 KwxliSHfeSroi/Tif^itft’ 
6 , 0 *Jtt:IDf\ 4 t&** 2 , 2 #flfel* 
*•»/#, 3 #JtE 4 #»t' 4 A 2 , 5 #«s 
ft**®, 6 , 7 , 8 #* 61*2 
> 7 °, fftM/IMrUOiKL, *®*ScSr*t* 
Lit. 

<st, ^erisa-cT 

•V S' > IS® HUS, ti’ 5 i t-C'AWfia 
±© E to 0 fc r'-^ fc t^tft’ft.ft 
ti ’5 J: 0 1 E 0 ©*ftA'&‘fa-t«:J:* 3 - 
K# 4 i’UtflF#Ei’j 0 ***?!i **6 Lfa 4 
*A. £ £ 4 rat » A* «t 5 «:, SfSjrt'* 
T*K 3 *v: Cv *6 ti’ 7 ®lilS'fi:L-CF B 1 
«i*!» 4 t. 5^0 

■Cifli'tii '4 aytfa-^It/c < 9 A* 4 
fe»tt*t**&»« 4 C 4 -i/A. 

St, i’4 4-C*aS«:fl*oi:9fc4fr-fri: 
L/:i J o-cft©7o/7 a Sr St < A'Si'. 
7 K fcX 0123456 
7"-^ 4 3 0 2 3 1 2 

Cfa, 0, 1, 2 #atf 30ft f A D , 3# 
Hfeft*JEL», 4 , 5 #»t' 1 t ?C •) , 6 f 
IS*Sr*SLt, -3 4 0 30+1=-^, 31ft* 
#c,fa4tfa. U/.ft'tSci', CfaSr 



m 4 IDMHfctf* 

4 1113 12 

I 1 lilt 

fattll £ 14 - 1 « 4 rUS-tt 

| Kill 

I— *0>2#jft*aM»TA6 3affliH."2ID 
tt'ilD 



0 5 i>-v>7£trt,<D&£ 

6 7 3 2 8 9 

ft'W* | #tt 2 T *10 fit*- 

AMft'b»©A* 



l#itb*>?.I%Ates!)t L4 5 t, 0 + 1 = 
fcSEtrZ fcft»t:>t, 4o7;<*of;IS* 

ft T mt < s 0 ft. 

{? 0 #abft* 4 ft’**it 5 A' Dt', 

Lt^fa.lfl 5 I ©^5 Ltfctfi 
dtfl’t'L * 5 . 96 C 96 C, : 07 p 
/ 7 i, 2 #abft'ii^lfSri 6 *t L 4 5 t 
E 5 4 4 1 Li 5 . 2 #at» 0 ft*’&S )P 
■vv/Wtfa. tolli: 2 , 3 tuts. 
A'*> c, 23 #at^ E -y'+ yf L t L 4 5 ©f 
t. St, 23 #afet l’ -ot {> c C©ttl^l* 
E^ftoti^ft’^faft’ti*, *ft**fe 

ft**® r # 7 fej ft. 7 “n^ 7 ^i:A*® 

5 x***o/c t S fc| 5 ]L 4 5 E 

i:4 I) 4 1. 3 #ltfeSr 2 Et4EcASr, 
®aot0SrAfatL4 A If, 31#abt:s? 
■yyfLt, :/U.MLt L 4 i’ 4 t. 

:01 5 ^s/yftut^t^ftt, 
o 4 0 ff»f Lft ’*0 4 *A*» 6 , : 0 i 
7 i:MU’i* 0 »Mi:ii:E **9 

SE44®t*t. 

• -?zsym\z<£z> 

st, ;:4t®i^*i’t^LL-ft*, 
5 ^L#f*:Wi^t:^*) 4 L 4 5 . 
•vyylSt'to^'v aSt#< ©(iE 5 Lt 
t* L * 7 ft*. 



iftii*3A*i^ir»’4T ifa. -*•>> 
WttHHuioTittttEfTSftito SS© 
li 5 -O&^tz NAND Y- b li, A J] tfft 
'y'Cti'to tBr Aj i "CTO** <i 20nS (T/-fcT7 
K) L*>*>**0 iTAo A'l'AH' lit#© 
C©i?&®ffr 
«- J: -o -r ^ n 2. cd-tT** ^ , 100 

ft^-iiioo^#© 1 tHMErstfr sns« 
TT o c ni:w L-C BASIC ^t'-Tliz© 
ft^4rl000®& 0 10,000®& 

LxT, gfrZff ^?i'S<D-C?ft>, fc'5 
LTia< i'it. 

# aa^ut^rguisifiE 

*£***«> it. w-3< u ifcaara 
ft If BASIC © OUT ft ^ ^ POKE ft ft 
fcfc'-r+fti fc**J£*> if L 1 ? Itfit' i, 
£ < ©i#ft, t < 

A* t 9 tt t' -? 7 7|§©jl9't' = 7 h v-w 
lX*t,Ui'L 41V0tTT. :0i5^ 
*#ft, •?5'visri**#u&i'iUii&3;' 
h o -^frs&SfcT *«#©*-» 7 7®4- 
- 0^-T 7 4- BASIC IDCit) 

©*»*»*■ &*5 04 *hww , +. z<d 

l 5 x KrM'^iA? 

ja±***9$M y ?nrt. 

*!:*'* f?K 

®»a f ii:$3lirr § 5 i 5 U, #•<:£ 
»&ftftl**^77Bi:iiftl) 
i-a-Ao «*?ci tfr+*fcftutt. 

^ **tft*ft*iMii:iii*#t»*-c* ii u 
imiffc o i-a-A. ^ i'o-cfci^ 
A-rt. ii0if<^fc^0 

5*>, AH*-<i0A;fj4 > #'3, fc£fci'5 

ftftli#£ L 2 -a-Ao fTit0S0£L*I> 

ft d i -a- Ao i ftft-ir-r & 4 0 ii pc-ssoo 
7 y - x-c% < ttfe n-r * si 5 p a p (cpu) 

<Dm&, 2*ft-C'16«rit'-C't. *3 4 0, 
*S£*»lO*ft0655354-;g;l 5 i 5 &J5L L 
*li, *ttfflt::ftli ^/ b/ 5 
ur4 6«ei'0t't. i A\ *-u*©ftftii 

* o i-a-Ao 

l*’L, CSi'oA&Slii 



ifc»i:10t^-fvt LTffiA-TL 
4x.lf, fcfVt,i't,7 0 

A LitT&Slii < A 0 4 T**» 

0 5 s ; \vcrtfxm 

ii:Uo;<f^L/:i ! , 

li*£L4To it:, itiZV}?* SUr 

Si: lifts A fti f , *£Ijli#;£l4To 
-S®i;4 , o*>At'Li ilf, t'0-v-> 

7t't>m:i saioftotTHfriifti'O 
TT**, ti:*’< *M&ftftl*’fcW.:ft 
I:«ni i-trif, Uti-izi, 
©t^-CTo -rif, ;©#»&-* 77 ® 
4-^L-n>t>*-y j pt-< -rsfcfto r r-t 
>7*7 j i:oi'f<fccijt(!Bl4To 

yyym^ytzyyy 

■»7 7®liflF*t\ o 4 •> S^fT. 2 
itiic4-i63ift-c'*ti t-rs5ii®< fcs 
t> 00 . /n /7 &AT fc 

T {> C * 4: 1' 11 t' #»© A® i: lit* 9 4 ft 
A» 

21 00 80 
11 00 A0 
01 00 10 
ED B0 
C9 

4AT, UA 4Af:A4(,Afi-C 
AA'i*. TAi-a-Ao 60SLLTL41' 
Hfc. :^J'>'li'^y0^5re 
UTS ti'5 {>0&AT'T* f , ZAfc©® 
Ti-r* < Alift 4 0 V> 4 TAo ilSli, 

LD HL, 8000 H 
LD DE, 0A000H 
LD BC, 1000H 
LDIR 
RET 

0 f 5 csi'-c, mm-ru^y/.r-mmi 

TUi’iT. :01 ?i:*<Slf4-T-b 

V7 f 'jm Z0ffl!K?4-lT5 7°a7'7A4- 
7"fe>^7tiu^To 
7 -t >7*7 L^'>>mi& 1M1 trMJUS L 
IT, r JPj fci’ *.1*16*60 r C3j t*l, 
r LDIRj li r EDB0j "TT, W% 



Ui^-7 >m 0S?ffi’ T l’i0t0C 
^CA-TT* 5 , J5L LS!0ft^4' ADD, 519* 
4r SUB 4 t' fc i' i'6 L A- li 5 * f 6 4rjC *. 
Si y iili*a-i:*A'A5 t, ?5i'5: 
t *• C, 7 -fe 77*7 ? tlX l' S 0-TTo 

• eM/stA-rst 

• CPU 

v^>^0IS4-TS t 9CH1-C < Sffllf 
< o {, ft 0 i To ;**y i*’7 K'-'X 
t*>. 7 -t 77'7 t*-I, i 5-TTo e-yh 
1 1 - 5 ©liMi’fcw Lftb *-a-A*‘ ? i 
H, 2*601fff4ri&T*ftfc0T'To 2 
its© 8 ft 4 6 8 t'-> h, 16lfflil6t'-7 h 
fTfao r, 9 tu 8 t*7 Mi 1 x?/f b L 
mxtiito :©'M h 
c,<Mi'f;:ti ! i6S-rU:5. 7^y*» 
256K^M h*s t I'tlf, 2 1660 8 tfr 
S filfeU**, 256 x 10241® fti L l’ 

5**c«ci>aT. y©lA?4i'5 l 

9© r 4n J lii000t'li4: < , <Ktfi:lil024 

4-^L *T„ 

CPU li-7 7>|f4r^ltTS,x^y 370 
SX^ft S Sl5pn0 ; t -CTo ■» 7 7Mli ^ 0 
Spai:ioT»f?9n, c ©SPmlili*-© 
»Si:itft-«r4*.S Ui’oTiUiA 
1 u LA* *> 0 i: Lfc 0 T S c t 
-r4x.S6ll-trT* f ) 1 1' 5 i t 4rfti' * 
T„ C0®S©lWrft^ J P7'-*4r*W 
TSS|5«-0®S&* J ®t'-7 h®B#i:1t$TS 
iti'fiSi-, ti'5 C t* { C.0SPS.0 
<£*LiTo 

3 n** r ®t'7 h cpuj 1 1’ ? mmcorn 

titfC<D-C To T^T© PC-88007 y-7'i: 
ffifetl-Cl' S Z80 t l' 5 CPU liF*5S|5t'8 
t'y b 4-®8#i:1t$ Lti-i To PC-9800 
7 y —X-CfebinX I- S 8086-r li 16 1' -7 h 
4r*tact LTi’T r 16k'y h CPUj t«flf 
ti, 80386 li r 32t'7 h CPUj 1 1' 5 fclli 
0-fTo 

H'lbuxr, ^7 7»liW*-ti'5 - 
t-nni’-cs 4 LA’* f , fc**-9Ti'fc/fl» 
fcfU5i-o itiA'U-riiliaiifo*>o 
Tfc. 7°B^5A4r#< Ulii’fcttti'f 
Li5*-f>, JA® I- li. *^47 ” b/ 7 
A4r{^S±-r0#*.#^l!i®L4To 4 fc. 
K#0*49A©KHi: fc t*At*Ato§i 

L 4 To 

e L JT L*» 9 •£'*»*<■ < A'9 i’ 0 
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r MS-Enginej? 

rt\r\6^ NEC r MS-Engine J £ 

^ lv3ZL^YUxtTtfl0BSn*Lfc. zntf PC-88VA0H— tf-© 

\* .c-OO®^ a»'ctt@«lu&Ti\a©OTo #s-ciif6\i/-;i/3tf®<VAiL— tr- 

\w»^ C© r MS- 

Enginej ©sicioMS-DOSJi^ 



VA r MS-DOS © 

\& s m^ 0 ) os t* 4 PC-Engine I*. 
^COtfeO MS-DOS £■ < SUi L T 

i'it. Ta *97 7 4 »&&&', 

i mar a *?h9 it£*T*jiftft«>, 
fill: 7r< *«fct 6 c t *nfl#ft L, 

DOS © a V > K t> li t A. E |W]— ft . 

l*‘l, 

14 ft l '©1*. MS-DOS Wn/7 A Sr 

ssva r»**ti tut-rs i*/i. i zb 

* f , rNEC-~-V^A 7 '*XT a^USBj 
*’ Cil8S5#i/J r MS-Enginej tfiS? i, 
88 V A _h‘C' MS-DOS 0V7 h 

t^lTS S ti'5©rt 0 88VA3-— f- 

ftfc-of, ;ntt*j»-a-5ri'-a.-xt'L 
15. 4*014. flWft»*3ftfctf*'*>K 
— Kffl-a -— t a ') f A r G-turboj t t 
^|HULi5. 

MS-DOS &MJMV 

k i'->T {>, &itfc, 

fc< 9Ao*M* f a-c«i'*-ro ur, n 
EC®^ aVtH<y7Hi, fktt©'* 
y 3 >-n4®i*>t - fc**T* it A (*i£ 

->ft {, © t> * 0 14 L 4 t**). ft-tft c,, '* 
y 3 > cr k ft ' '- K <7 a. 7 4: 4 *• c > f 



to 

ft k i. 14* ft ft* T 3® & ft (.'Wftfr o ft 6 . 
t/y^T’yots^i, IMlSj©* 

44MH4W&1*, *ffi&at4irL i 5o 

l*>l, icovnzmmitctfA ksa** 
oi'-c < <xt, wii'fti'j tgirn 
i4, ^icin-cif^t < t4*\ 
*irIoTK<n4i'SrLT<nit. 

^ { y 3 {, cnt:(Hft*i#-r, *- 

A* 1 4 fc iSffi t: s^t 4 

fc'fy 3>-t cm I) ft. ft'*-c>, 0 

®^y3^i:®^^-CLioft/D/7 

a( 4, toft4Hrt4 ; fc**t^ i-B-A. 

L*-l, £®'*y 3 ><:1tjfi LfttM K 
fttr^ ^i'^r-f^^ftiA/' 
tt i'j ti’Jltf. tf>fKSAtt*©tt1Hr 
Rfi : L-C<nit„ C ©;*' >f Kfft* T MS- 
DOS t.|ot{ ft'Sl'. 

i'4©l4ftfc llStt* 5 , MS-DOS 14 
*- *'-K*’iiA*t4 fc*\ BBcX^ 

4 ft t'©Am* cut 4#*faft 

it ;©ty>-f->ftffc;aiL-cffi5 
- fc Sri'A'rAa-./Pfc l'l' 4 t**, S'* 
TA3-A0M*’ NEC©^'°y 3>_h0 
MS-DOS t, fllltt©>-*y.3 >±0 MS- 
DOS flifc-Stt-Ci' 4 ©ft. 

S'Xf a. 3-^*^JE— $ftT<.'4fe*Sf 
t, I5^y 3 MS-DOS _tft C.I5] 
Cfn^Aftgja-t- i* J t£ it (*> 



4,*A, *<lfr*»lTft«oT*tU4, r 
t)„ 

L*‘Lft**&, /?7^ if 14 

#'*y 3 » ft&i'* f * 4 ©f . 

MS-DOS -rtt- 

4 - t **t £ 4 t A» ft'*’ & MS-DOS _t 
O/n/^A/'lL-Ct, ?W7 7-( 
7 ^aa^f ©iii’i$$0^y 3 y ©#s 
ft«d6ft«fflLTfc'W4. Ii*’©''°y 3 y 
© MS-DOS t'i4®I*’t ^ k * r t|t ft < ft 

0 it,H^lfV-7°nft t'l4«©0t:t 

L. PC-9801© MS-DOS ±0 N88-BASIC 
ftt'fe, Ii*‘0^' o y3y-n4fi)& itAo 
ft'o ft C, ? 5 l’o ft7"B ^7 A 14 MS- 
DOS ±-r^ 4 14 ft I,’ ft'* 5 fci’fctt 

4*-t Lti-tAo L*’L, MS-DOS ±© 
V-t > nt^^ftX*7T-f7H4, MS- 
DOS _h© (i *’© 7" n ^ 7 A -TMt Aft' U f'J 
fflLftO-r^ito yrAxucosmii^b 
4 ft'uirt., tt*»tonfti’7« y 7 h* T *4 
©ft. PC-Engine **, MS-DOS t 7 7 
■ ^l£a fr|S]-t:Ltl'4gftfe - -C* 

/ItN 

MS-Engine 

m$ S < ft t) 4 L ft**, --*•?,** 

^Sfto 

PC-Engine 14, j* A * t ftlH#,t 4 S' X 
ta 3-^*? MS-DOS t*iiftft-oTl' 
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*-r. 

t i ?>#, t < iibb^©*^©^** 
MS-DOS Utmtt^r'.'&V-Cto t'i' 
f> MS - DOS ±07° nj/^AfcPC- 
Engine ±t'B)*' £ 5 l L X fe , H® II ft II 
t'©H**»* Ht. 

* I t*W»t 4 0* f , ^OSS^t 4 MS- 
Engine 1 T, S' 

X r A a {, MS-DOS t n II L 
TLii’it. *0*5^, MS-DOS±0# 
«7°nr7Afc88VA±t'tt*>t4 1 ? II 
^-oTi.'40'C'to 

Hii>£0a®-rPC-98Olffl0— ±B|J?rMS- 
Engine ±-C'W*'± I t i t A c fc' 
WV7 h4rffix.4i*ti’5 fc, MS-DOS 
©SUPS' x f a = — M'lf Srfijffl L c, 
ftft rn^A-rto **i L-CIi, *-* 
-b'*'*b0A*, x 

•f X^T^-teX, ULt03o*r**i ix 

fl^ftft, m^^ru^yA-cto 

Kbiftt lii'oT t, MS-DOS II 1&&M 
emay-zi'+nif, 1 - 7 ^ 7 ^! 

:ni-fot:4, 88VAJB 
li ttBHSy-A - 4 t* ft I' II# L *>-3 tzb It 
ft* 1 , MS-Engine 0I£ till «t 0 , —Sill 
*#0^fy3V|;Hltfti'||*M|»**t'S 
±j*-^± 2 y-tzzi ii ft 4 ©rto 

MS-Engine 

2 /X?Zi«fP 3-5 

WT3* ! Engine Level 1 &’HaT 4 fc, 7*4 
I0f^7^0 
+ Hli, S10J: 5 ft 9ffl©7 7'f 7 p* { A 
•sTl’it. :nc.077±^, f#t> 
0 PC-Engine 0i^X7if ■( X ^ II a if 
— t 4 t, £ MS-Engine 0 S' X x A 
US:# Lit, 

*fW9n, a tf-0^«*aiwi tHt 

t "t* II h 4 PC-Engine 0J'77if'( 
X7fclsg5 C t t-TS 2 t* J , 5-0It 
3 r#x.T, lrU'J '^7 
£ MS-Engine ft L i t „ 

PC-Engine ^B|tj IT, A b* 7 4 7'li 
PC-Engine 0-7X7^7'- f X 7 ?r Aflft 
ii, B b'x'f 7*li*rU.’x*4 
b L, 

FORMAT B : /S/V 

fc A;tj Lit. r FORMAT B : j II I -a 



T, B K? 4 7'0x*4 X 7* T 7 * — -v y b 
SftitiL/S t7 0 S'^I'a^-I>l,'•t<.'4ft 
«>, A K 7 4 7*0 S' X f A** B b* y 4 7*11 
atf-SttT, frU’^Xf Af'^f X7* } 

{Hixif. £ft, ^Da-i.5^ (X* 

4 x^ 0 £jfij) fcoH4ft«&ti, ^HMili/ 
V*7'>a Vfcoi'-Cl'ito 
**y i-A7^a^isii± 

MS-Engine 
t Li Lft 0 

<k II, MS-Engine 077^^3^- 
L i to 

b* 7 4 7* 1 II, MS-Engine 0x"4 X 7 
Sf-fc7 hit, 

COPY A : B : 

fcl?KM, *107 7 4 7pfcb'7 4 7* B0 
$r L i' PC-Engine S' X x A x' 4 X^lin 
t°- Lite 

I tif OK ft o iHt^SLt: MS- 
Engine > x f Ax*<( x 7 li, * y s^-tvi' 
i LTfS^LTfett, I± 4 - 3 k°-LT^ 
t Jii'-TL i 7. 

ftfe, # ill© PC-Engine S' X x Ax*4 
x70in)fl7 y-^*ii, 

1185792'*4 h 

f t * J , MS-Engine 774 7vfc'3lf — t 
4 fc, 

1175552 '*4 b 

l , 1024IW4 b li L'ffi't lit, Z cDm% 
ftC.lf^ffl±HL^xfti'rL 15 (7^ 
-^ili, j7XxA0^?-st 3 j/|i ioTT 

x 5 >-h 75 ss 

iWS^ngine i'XtAf^ xtir b* 7 4 
7* A II -fe 7 b L'CS'XxAy-fey ht4 



t , MS-Engine * J X*- Kit. 

*l®(lli, PC-Engine X *- b mi 
1 0 AUTOEXEC. BAT 7 r A J: ^ 
t, MS-Engine to 1077 
'T/HHi, iic 0 J: ? ft7°oi7'7 A*J**«n 
-Ct'it, 

CLS 

MSENGINE 

VER 

PRESET 

let 4 II, *10 + 0 MSENGINE. CO 
M 7 7 4 *'fc*fft tttf, MS-Engine * 

- K II ft 4 0fto fit VER. COM 7 

7 -4 7HI J: -a T DOS j7*a L 

i to M&IZ PRESET. COM 7 7 4 7HI 
lat RS-232C sjl- b *■ -t 7 b T 7 7°« 

am Li t, 

MS-Engine 0 &UJ0 ft * II AUTOEX 
EC. BAT 7 7^i , flSH4 0-f,i- 
±u 

^L ft 4 tf II« It X &Wi * 7° n 
tiifty ito 

fitliD 7 >K 

PC -'Engine 0 3 -7 > b* li, MS-DOS 0 
b*^S^I^^?>±•Cl.'it* , , ^ 0 t 
4 b\1-C\if) 0 itA-o 
MS-Engine t'li, <i :0 7o03-?vb't 
L-Ct-t-b L-Ci'it. 
•SSftWWLi U5« 

• BREAK [ON/OFF] 

&DOS b'*lf+H, BREAK A- 

- (CTRL-C) Ili4*y*0+*fftl1f»rt 
4 *■, lit44'0X±; f-Tt o 

• VERIFY [ON/OFF] 

VERIFY ON II t 4 t , VMr 4 X?<D 



*1 MS-Engine<7)+0 7 7 1 A- 

MSENGINE. COM MS-Engine*# 

BREAK.COM MS-DOS(7>rt®3 7 7 K 

VERIFY.COM MS-DOS0) f*3 SS 3 X 7 K 

VER. COM DOS^<-i>a 7<7»|SS. 

PRESET. COM RS-232C*tt#Kt 

AUTOEXEC. BAT MS-Engineffl*i2 ! *Sl'< y =f-7 7 4 )V 

RS232C. COM PC-9801fflMS-DOSOTSPEED. COM (7)7 7' 7 7 

COPYVA. COM PC-9801 fflMS DOS<7)COPYA. COM (7) 7 7' 7 7 

DUMPVA. COM PC-9801fflMS-DOS©DUMP.COMOT77'77 
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01 ( ^0^7 AM* ) 

^ABflSgOTiftih. -r 





©DEBUG fc SI fr 

I 



*Sii*l$i:^y 77 4 «t1t 5 J:5U4*» 
it. old, y — K 77754 h-=e— k 
fc&SfclttTt. fcflfL, t'4X7©*i! 

4*» it l, narom 

*&*ifrMHWttt***i'©*\ :C37 
7K«r*5**u:«fcAE$ei’l'Lj; 5 = 

• VER 

D0S©'*-^a7*^, asWiflUe 

Li to 

¥«:, 

VER 
fctS fc, 

MS-Engine S' 3 73 . 10 
fcS^Lit, 

WT© 3o037y Kli, PC-9800 7 ') 
-X'ffl© MS-DOS Ofiia^yK SPEE 
D. COM, COPYA. COM, DUMP. COM 
© 3 o £ MS-Engine "THE ttJL 
*©7^'7 0 ^t'to 

• RS23EC 

RS-232C 4 ^7i-x0t:-V"( b, 
'« y T -f U fc' ©^ H X Lite 

• COPYVA 

*tffijAdJ*&S(r4 X7 h'7' f 7\ RS- 
232C jS— I* ) tCD^-rt'-^^iioA-y, 

Sim-oA**> Li to 

• DUMPVA 

r* *9 ?t 4-*©rt£*, leifiSc-r^ 
S% L i t. TYPE 3 -7 V KOltiftftIK t 1' 

ms-dos ammszh-fo 

^yr^^L-Ci'iti’, 
kyny? C-tty yyblliMS- 

Engine f fc Wffl' t 5 £ fc **t* S i t„ fc*5 
L, a*S^**c, MS-DOS ©y-^frArW 
L-ci'^itnifi y i-a-Ao 
MS-DOSOBH^y-^Sr^Li Li 
5. 

• EDLIN 

7 4 yif-f ^ t*to MS-Engine li 7 
^x^?-yjf-f70PCif-( 
rSSOt*. EDLIN 
Li 5o 

•MASM 

8086©7-t7T'7irt* J , 8M7 ^b 
♦❖MWB frfBiTi'it. MASM* ! **x 



If, 88VA fc&ifc&Bf!fS-7Xt A fc L-CiS 

at s - ta'-ra 5 ©ft. 

M ASM t 7 -fc 7 -7 7 7° n y 7 u *> Bfl H 

tS^JBtt, 0 IOJ: 5«:ft0 it, 

• LINK 

MASMOtTVi* h 774 **•&, 
i^S 0 7r^^4*Lito RU$u 
7 4 7*7 9 t* f t 

& ito 

• EXE 2 BIN 

COM *f^0*fr7r 4 
if, £ © EXE2BIN 4- Isgffl L i toCOM -t 
f^tli, 7i-Vi7D/7A, 
y r, r* 5 64K(-t^^7h) 

nett* sfc©irt* f , »«ttW«Lit„ 

•CREF 

r-t^^LLtnT'yiO^nx!) 7 

ri'Vxfcm&Lito 

•LIB 

7 4 7*7 y 7r4^0«, *31*^5 

/i«> 0 - 3 .— f 4 y r>f ft. 



• DEBUG 

1 74 77-fc77V*£tEfci£7-t77V 

• SYMDEB 

■ DEBUG OttUgi’K'ffcLfc fc ©ft. 7* 
7-7454 V b £fc'©tfc£ CV-x y X b 

**A^<Sn-ci.'ito 
PC-Engine ©RSE - ^ 7 7ig-t — 7 If, £ 
©SYMDEB 4 ^iSLT^e, tit is*), li 
HrPW©3-»7K*f6dL*t. Lt'L, 7 
7 ** y 7 7 *•>« 7 7"^Bg i«* * i * a, 

• FIND 

^£7 7 4 *'©+*> ^, »££**** 
U-tf^^LTS^Lito 
:©37^|fcij;** I mZX^mZ'k 
trfi-©»ttlr*wLfcl>, lT#^-4-S^t 
4 &£©«&&**£* ©-Ut* 5 , 
MS-Engine -riiffiffl^BEtto 
LULL© 37 7 K (i, MS-Engine fc & C 
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MS-DOS©-^ b 7-t >7'y k^ X (,' U 
& i A„ PC-9801fflMS-DOS 
<Dy-»kffiAt&Z Ir.Kt, t-ttf, f® 



t&f*18,000Ro L**L, $S*&M?§:XXt 

^ ©fasts t L-cii, *> ©r-r „ 

88V A i ligiji: PC-9801 1 MS-DOS k 
PlT^LX^ilJb fat.fifct'L i 5* 1 , h 




OS ffl 7“ b 7' 7 A * f t T MS- 
EngineXT-iillliliT ^ A. & Cffifi] & C fc It 
$>*)itAt\ ®^i:i£iiL/.*tfct), f£ 
k 5© liH^ MS-DOS 
i xft c> ntzt ay 7 
i tz, MS-DOS ©i'XTia — >\/<T) 
-C, &0f>©U-y-tf-h L'Cl'&i,'©?', 

- ti c, & L tz 7° b 7 * 7 a {> ni#g 
ffo 



ODH 

0FH-18H (FCB I:i4f^? 

77-tx) 

1DH-24H (7 7-tx) 

26H-29H (7 7-fcx) 

32H, 34H, 37H 
44H 

50H—53H, 55H (#&M) 

59H, 5CH liLL 

MS-DOS ffl© r Let’sCj, r LatticeCj, 

iif®C3 7/q 7 <Dm¥immz nx 

mxtolztsi, r MS-Cj Ii-SEIA 

0£®'ib4l;0: trto 

NEC- i -^x47'J'XfA*I 
SHt'li, r Let’s CjfflOT'? 7 4 y ^ 7 4 7 

7 y km^tsz 5 -r-f„ ch^-tssva 

©^7 7 4 Hi, tefel 

^»i'^ let o <• 5-rtfco 

MS - Engine \3.%-£U 
MS-DOS 3 HiUi/ 

-ZXtt't,, 7 7 IBIA[#i:li-h9-&®J 
«is* ? £>srtc A’ t xli'^mXjni:* 
7 1z PC-9801fflMULISP f>, fa * C, < 
MS-DOS f± If t S^fcOfti'MS- 
Enginet'li®i*‘1‘ Z ItfX & i -it A, "CL 



& fa, <3* Hi 16 IS 5 <x tz MS - Engine li 
Level lti'Kt -T.^mLevel 2, Level 3 
t, X 6 MS-DOS K&fkk&#>tZ'<-i7 



y * p-Tto 

r G-turboj izoivc 

-ftli, MS-Engine fc im NEC — jl 

-* ^ 4 7* -7 X f C, n l 



L fc, PC-Engine i tz li MS-Engine © 3 
•vvK^-Kt', x—f-yf v^-X'^t' 



7 * 70*4 5f«r*fft'S4, iS+SlJB-vy 
L i L J; 5 . 

• SUPER ON/OFF 

vtf-x'*- Kfr|B£. ff 

»Lit. 

•ESC 

tSfx|>gl«r-^liit, 7' 5 7 

tX'iSm&fc'fcj^-f < Lit, 

tta, 

•GCLS 



^77^ sr^BBfriU^Lit. 
CLG [color code] 

^77^ y7Wffi$r?8£Li to 256 
fi®A7-3-Kiri!)oj:t: t tr 

GRAPHIC ON/OFF 

77 7o^il0l^ff»J, *jfc 
Lite 

MOUSE ON/OFF 

•v^x^-y7u©^%- *f»r, ^jhL 



it. 

VIDEO ON/OFF 

**'**'5'* 4 **■*&, frjfcL*+„ 



SNAP 

fr't r*J 9 t x'*- K *• Mfe L , M 
in*- **#Sti4 t, x'£7y 

-x'Lito 



• VMODE CC] 

75 7 0^-Bilr, 640X200 K 7 h 



65,536£*- K«:«S Li to 
Cxt vf-knHb fc, 
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y >*A'-oA*f, r **J*y-f ^7 r U' 

-f*«j t LTJtiffSftAOT'iSo 
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•1*1 y??') >7 r MP-80j •IJU *+•/ >(7)LBP-> >) — X<7)*»fSt, U— 9-i > 3 y h r LBP-B406j 



4. 35X*En«U«l<i:Ur0 



^'°y3y©fflii®lot:, v— K^n-t 
y^>7'**£5 0 aviigi?** 

air, 7-y“B ti'i|jT^X7-7“a4> 

M7-/n rms L /j X*li#**-to t: 
7“ !/ v^-TEPSliJt 4 fc It//**, Mil 14 X? 
®p a n K-r*5o 

ffiL£l!5l$0Ky hT* S i"*l4, IX? 
4r**7 x«5 K* Hc£flMtL*C*&. 
/n/7A!)xK^Ui’<, XftL 
*«fflt4X?£K£fc'/4**o/j. &X* 
fMtfflr!>y*fc i-cii, 74 7°y A & — 
©4 5 fcj£?*;ft**4 < ttfc/iT i’/j. 

5. H*HEDISM*<!:Ura> 

'*y3V0te#67y7°i> tfi * t i* 
*J0 64^. fc 5 t 5 
^y-c*/j„ aa, 7°y 
■f>8J:5i:tt-»fc. 

7-7°n t l'ilJT0?g7-7 D B0; fc 0 

*ftfcffi?/j«>»i'*y fllX* 

EP8'Jt5/w-»t:7°y 

tzQfhb o 

B. 

^y a >ttm:#s»a*0* 5-Bffi 
4risei S 1 5 Cloti’t. ?y? A'y? 
y-n 't, f; <$*,%%$ ti. *£<!>©£ 4 A 
14 CRT 4-4f-vy^xt:Lfi^0^)Si:i' 

* la//. B®i:a**ai/nur, 

K 3 tf- L -C A/w < * 5 ®**Ai#o /7 7 
4 y77°y J'XIJ, 



EPBiJtS^ fc feT*&/w***, ^14 5^0^1/ 
*044 EPISS'J L fci' 1 1’ 5 g*l4$£**y A'. 
t/i«:i6iT»9-ry y/i'l«L/; 0 

7. *&<DEPi*y«k:ura> 

Jft*>e>l4, 7-7°nt'tt/4<7'x7'h 
V?*'*'?) V jx>7'0B?Fft//o * L tf4 

7 h y7“>/' , 7'!l y J'>7'tt,?*0PPB'ja 

t LT07°y Lttftfc.tCt' 

gttL/j©**^-- f-k'-A7’y>7(¥*2). 

Jg4®7°y >714, X*fc^7-0)Si 
-*i:4T/»m-t/S LPP?p a pKfciiS{) 4 < 
loti’i*', 4// 4 //**© EPI'ja© £ 
Kfc»#uiifiJiiL-Ci.'£i\, y^ijy — 
©v-f-t'-A/!! V7-tr$ffi*4fc0**, 
*.4//* 5. 

8 x*-XA©a<b 8 

7°y y7©ep?*s©as?r0 1 u^to 
EP?*Sfc, tfi'fci'M L /:Ii:m L 
4 5. 

jS^7?xt 

Cfcfc < ■t>i:iS?*Stii'ot' t, I’*'-' 



*f®*S3y/a- 
7/4ifi:«i^sn-Ci.'S KyAHWy-f > 
X'J 'stlibi o 

0 2 !:**«£ **t. l*©*i'K* 
A«Sii:, A i ' *Ia] I J ASCII X? ( 128X 
?) ®is?**sii4n-ci.'5o a*i6]ui4, 
isii:ffi?**pp?»i//i/^Airi'4o 
;oi>'7i **it; it-autst 4 6 \i<h * 
**, i inters 5 tuarw^Lfci'X? 

**HIo-r<So 

^sy-y-C'np< ftfLt, ffi?©»*ffl«i: 
;©(»** K»A0-H«rtu, 
i ft®ff?«r®x//i/ (AS’7yr/v7°y 

yXri4136«T) ^iTL-Cftbns. Oi 
D, lfi-**lil?|5]Bfi:PP?-r& So J 0 4 
?0&i0£, y 4 >7) >9 tnfA'0-r 
*4 (*mt'l4*4 

J07-f y7°y V7I4, pp?i- y h %■ 

ff?*//wa-*//*3ift«fi7/** 6, ep? 

I4ii I.’**, j»#a5fAli*>l'Laai * 
n/4*>// L, WUSfi’iU', 
4k*-ri4 i (> ** < , 'l'3fc*7 4 x^fflA 
t'te5©i:l4Ji$/4t'. 



izr, 7^ry>f7-04 5 1 tT«T 



g i iw/jitrottsi 

as?** 



K 7 |vMJ 77 XJi 



I h ' 

■Q: 



K5 A 

7-f y^-;u 



- tittst 

K y K7'<7 l-^st 



»tei 

*50 

T-HE50 



-f >7i>x y 



— — 

>7) 



C 



*7f77 K 
««««»* 
u— tf-e-A 
*S->yy7-(LCS) 
LED(«Jt7 r -f + -K) 
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i x (.'<■> y y > ? 

igSOT 0 '; y^rttlitAe** 
-> y r^r y > */***, * ©gp^itii# 
/d* f , flw:#actRftur 
* •< t T-f $>-*4 -JU^jfc 

©2o***r£„ i'r*n*:s:*>fr*4* 
— t'ttfe<xri’6JSrSC4©t', £RU:*T 

* /f t£&30mm II £© 

**©*^*©*W:8** , *li nri’ s 
(H3#Ji). *****!*, »K-*«r+<& 
li i±T3fl6]© 2 ^|6]©HUS?-a’ 4 d tr 

.£■9 1/ 5 d fc -fft 5 „ 

7*-rs;-rt-r-ji/»se 

7 * 4 9 4 7°sK-a- 

sujt^nur, *•* yfffU'EP^s-r* 

S(fP¥WB). 

^irKRfrHIUjRto nJMfti:*A*r 

Ko^ciS^^&nTi'*. :©n®® 

SfA-7 Mrx**tf v^-jr-THR 
3*. ITo-sSig^<r-#±«:io'C< 5. 

mu x^s-gp^-rso *4 rtf-*#* 

i y liMK» f )|LM. 

is^#s© => y r^ry y* ax^im 

L v '©/'**, gp^j£g©JI3 fc, /77>( 
t, <MH, 

fflitft d 1 *«Bwr. 

KsrhTh'J^XSFSC 

m¥#£® ma wtit-r * fc ». x * © 

»*ft-HW)j(lC©ltet'«R+6 Kvl-7 
I ■/ -y?x:fr:«fc* 5 #«?h./d„ 

K ? F F y yfxizit X^5r® 5 i: 

mto zvm-nt, ix^«7x«5h' 

v Y X’m&L d ©£fF35© K 

y s^y 
7*ry >*© K? FEP^-y Hi, 7dt 
i«7F7h, ttl K-y Mr— *CE» 
t5 I 5 «:t'&-Ci'5„ i©ffl^*K4r 
m i: 5 K V Y mi\ L 4* f 6 K » F *£»+ 
self, 7 x 5 F*spF©^ F y 7 i>xX 
^«rgp^-rs®7/o d©flg*«*i>s-rd 
t-r, * iff* flint's 6. 

:©Kic.lf, lo©pp^-y Kii'C, 
d t* j -rs s© 
tvi'Sna, taxnt«. itz, r 





Type Style: Courier 10 


abedef ghi jklmnopqrstuhi jklm 


IBM Electronic Typewrit 


ABCDEFGHIJKLMNOP 


applications, using int 


!£¥$[]<>( )4lf !g#$%0&»4lf 
.?Q° ABC AAA AAAAAAA 


choose the style of typ 




• EP^ffJA 

-fTOO-jOTEDSm 


• EP^WB 

r AUROURA 113j(7)EP^ff! 




770 ^ X^©#& t #**/. 



I /d K* h-* F y -7 **#£(: fc ft-»© 

«gi* f **a j , -v/f a>ffl©ry >* t l 
T *7J*j i: 9* L /d £ mm l I 5 . 

fiWTaiC 

^f*i!e»«E;©*ffiU«L/dmffit:il5* 

E^a-u-c, ie#iR©*i?ri§*'-rd tr 

K 9 Y *£»* 6 -H*Xt> & (H 6 ). 
d®#s©#aii, 

dtr, njR6©KSi f ibo/: (firm 
m • r EUY-10Ej) o 

fz ft, y **> *> « o /d/d', kmki* 

Sft©fti.>£gfe*r LTfey, Jt/dBa*Ii< £ 




*tt**«:<**ofc. 

■y— viu7dsc 

SSc*S©*1.65rSt&l/d0* J , -7 - vju 
K 7?S («»7Sit) /'„ 'J>S©%»ft: 
K (H7) 4r«i’. 

«nr*-it« k» hirie 

iiktSo 

K'l/S-OA^S^xC 

ffema;, -t-vA'ttLMff LX, K-y 
H5"</ Y2 rit©7“y 

5 /do «C«, +-■ 



07 -t l-7)^7 FJi 
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FfcfeftTS©i:*tL 

X, Ky »!>***& 

4 7*y**:/*ffl 

acff^ittF# Mrieati- 6(H8). 

-*•— »*jtfsc4**iiiie»R«r 
«X fc + ftOUWLT, tfiitti:0J*ra 
S fc I’ 5 / 9 ?» h * f 2> 0 , * ©m#&t 6 
:Uft>»fc. fcrtfi, x*-x'A*q®j# 
ftfc*. $B*ii#*i:*«r*oA:. 

:o#aii, JRHo-tv M**x*ti* 
**«j£ 4#§gl/j fc ©AT* 1 , * n Sr 0 * 

07'7iF-X** J ®!jtL( r M-lOlj¥*3# 

Ml), i ©H«#H«S^MII#a if * J #A L 

t, «wfrft 

#>M!(#^(ii7 , y I'i^p 

ft l fcft sn«7°y yfit-n-X'/bt. 

K y h >f 7'*/ h 7°y 7*©^/f 
*-rix «x#-r*4o ai0a-/'> 
vart*IHI»L t *ftit'10Sc7JRlt<.' 
/J80«r7 “ ) y 9 k 6 L /J CGP- 

80j)©tV&6o«^i^#*(SJ*flcm. 
l^'>-7CJ:ofl7l>'7 h fc-PP^trS 
Z'>>7’*rj:*j>-Xj*t*otZo iOW® 
\*mW;<DmX'®1x LTt'4 3Si£o * 07° 7 
f^i:<b4. § K ? h ©fig 

•7fj**c.^'Wtrir^>0/w' (E9 9). 

ED^SflOMm 

Ky h-v h 9 y*X7°y >*t*li, t0«> 
li 7 x 5 Fy KtrX?*»j£lti’/j**, 
PP^&KfcfaJiS-e-s/ja, 9 F y h ©^ 
y K «r»o A:«M**J* i X $ /j 0 X* ©8£ 
*fy<D F y h *Stii, ^ y F© F y h Set'* 
iotLi5i«, *2fifin:tt^y K©fW 
IWHM'3 (ts: fctTy h»:4£< t* 
1= So mm X*©*Fy MUM©*#©* 
yfi:L fcfS*#, 4 «■© 1 c L /j 4 f&ffi 
S/Cfc't'7'7 7 4 y^xfr Blit'S 4/7 
74 y77°!> V*fcS#l,/J. 

^^©ArAtJli, X¥*4> T fiit> 
i6 x i6 f y h -rm/tt S £>**»* 4 „ J ti 
tt*«x*-r©Ky fc-* fc y yyx^cjt 

^t, tti:f&©«K-C'ff^1‘4i fcCiS 
*», PP^tfy^^OJ: 5 «:ai’IH*t'E* 
t4 J tttfflMI/'oA:. Kt, PP^tfv 
«r*2Ht:*Fy fc*6 LAr=MfcEW©^ 
yFmsW; (H10). 

16 V y fc ©^ y fc'ii a X fc ffi/j'o /j©t\ 



129 a.-/\>-7^ 




• hj*«c «i#Ko.=/Ny v^^tcisKy P'f^<7i^5*<7)y';yy r GP-80j<DEn^9i) 



!” »*!!t'0*+,-. ^01234567891 l<->78flBCDEFQHIJKLMN0P0RSTUVUXVZCsr-'*bcd*fshlokli«no 
pqntuvwxyzC l>'i||At****4*Htr‘HtH-W»0i J rH-i-SH W.rjlBI974-u*iua4TOzm9MfU«V 

9»5t>tZR«7/lt7^w&^»aa9ViU43Tv >, MMMMIIIMMBIMMMMQMMMBW l " **s# '< >*♦. -. ' 

0 1 23436789 1 1 < «> 78ABCDEF8H I JKLMNOPQRSTUV/UXVZ C s 3 A “ x libcdpf gh i J k 1 nmopqr » t uvwxy z< I > 
|lit-M-i»»4H i,“ * +H- Wl«0i J r 4-1 -Hrl M.r jM* 4«**Pal *T4M*1>»Mn«WWm t3«7 AW-W 
*d>t t> J37 'tu, ms ♦ ■wuniMXfliiaimiiiiMwwugtiaBacMaH f i » #m ' O *+ , - . /0 1 23436789 1 1 < *> 7 
8 ABCDEFGH I JKLMNOPQRSTUVUXVZ C s 3 * *bcd*f gh 1 J k 1 mnopqrptu vwxy z< I > <•! II J.t-M-0*** H irNH-tt 

-«»0i J rH-l -*-ri Hl.r jUI» 77 / ox, i-ii ■JBT<'7I7nT7737y2«V94'J7 1 tlX*/' At7MmA>tt> JS7 ';iLkD7^' * 
gBUMlMIIIIMIIlBIlMBMMIMBBWW I " # * k& ' O *+ , - . /a 1 23436789 1 I < ■> 7SABCDEFQH IJKLMNO 
PQRSTUVUIXVZCvl^'xbcdPfghlJkl mnopqr » t u vwxy zC n“4U Wi«Oi 1 r'+l-SH Y 

• ED^g jD -?')>9to*.<r>n-7a, 56KyKOjft«^ yK»ffl, r ++/7- K400 jOTEP^K+i'/V) 

| | 5 6 K y h | 12P~| 

CXS^tC, SI 

mzr*j 

jrcfiJcL ^ IstZo 



• 

9 M'y^y KfrEot lff©tt*tTil8K 
y h ©«^ t- PP^ 1 4(,©Udfc. 

ig^l/24 K y h ^ y tldti' 

So 

t < t-24 Ky h7°y >f> lii«ffi/j*o izxr, 

%muvc 3 it i Si’g.t£tv*v-Ci s mnwn 

juvam lx % /jo 

ftCifi^/jD— l/JJ© 
SSli, -t— 7/y-N.y Kt;i •) 7/f 71 /^, y 
sK>i:atnA.M 

9-rsfcoAf. +— # 

ifiistipp^t'^ SX y y h*f*S„ 4/J, 
^y Ki:^fi)SI5* l S:i>/j«)3>7f^ h-fa 

x I* tl****i*4p«c 

< t*. 

7 ^ hSt'^flcSrSo kLX4>'**\ 
*^©J: 5 4*rtriffiSai'. 

*gSt'li7-7°nffl(;56Ky h 1 1> 5 
©it'f^f.^ti.'S (4r-V’/7 r 4rX/7 
— K 400 j &if) l'i ^PP^ffiK©.^,®! 
fe¥^IAi7— f-t'-A#S;Ul±40t' 



h s (PP^IJD). 

fb 

PPS'Jft®^, t^T0feUM0 3® 

fe-r*S->77, -74f7^, >fxn-®j|a 

A-g-6-t/t'^t'^ So 3fe4rt^tiHf 

WfHi:iis* f , &m'/jra«rmt/J«), 
7/5r«7o 

7°'/ >7©i^t 4fe0*7-y 4/74f 
«*.IJT, ^y-'ft* f t'^ So 

^-v — 7°* f 4 -fe/1 7— ©4 7^7'zy h 
7°^ 77%-ajL/jc t* 5 *s* j , itsffi-r/ 

>f ^-7 XC^' LSI* 5 * -7 /Jo 
lp*t7f-y'/-7P/j:^7-7 , y y^Srm 
L/j0IA1flX#o |5lttMS0^-7%>-g>^ 
^4-5 4 <f'lffllt, 4o®7^>-7X^i^ 
7-t'y^?, 4in- 7*7 y 
7©4fe44T/)ai-r7 > y y^4^o/j„ /' 

Sri'/j*, ?0|:©^liIiLtLid 

/Jo 

^4-fli, *7-7°y 7iJ?(iJr< a/J y 
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* n7°y >ttL±£tta I’. 

#&LTt.>6„ fc*f, ^5-EP 
JS'J 4- 1 4 *&£• fc #ii© * / *• B EP»J £ t * 
t ^ i-, 

y tfVC&gtS&gi'i&oA:,, 7-7°o 
fl«7°y n®^ 

J©!/^?r-^i:|8^c > n4 {>cD* { gi* 
L-C(.'5„ -»«V 3>fflC9^7-7°y >* t>, 

S ©SttOiiSS S 

(230CPS ;ntl*t-»i:eSc# 

an, i' * rmfs* >f r-r t ioocps, % 

l' t>©//t300CPS 4'*giTi.'4 0 t < 
EP^y K®&«Ott» fcf'Jffl IfcSUfrl&I 

##«:Ji < ftofc. 

RRVaiCtt. t> t t> t K •> h 4 
h^aUyjK, i^y.-K>#^±(fOM 
«-r®*|6jEP^* f t'^^:i.'o tn-rt, D! 

fttt»Ruaii'fc0«:?c-9T> 
ti'jor, 4Ar4Arwffrs4. 

F y h 4 h tt\i., -SUSit-r* 

SP* f *S, {ORfffrflilt/.:*, ffU' 
PPl^ssory 

lo|i-f»J>i'y hT'U 
/xVa*e,4 v^0tt¥-4-i«ai5-a-, ffl« 
±KK» HrKRI-S. SrsULT, *> 

T77 K3»* t So 

4 y IC/tO* 

3fe^, «c(:4 >*©*£*■»£ t>otmp^-f 
s^So r iP 

-130Kj ***S (»*«£>„ HllUtOR 

A L < *<:«, 

REE «-*•!# 4 fcBEftt'SC&R 
SfrJfcfflLTt'-s. 

#«»j®y?5C 

H12«:»iat3Sto 

1 ^CT) y ^ffeartFRSB^j: J: y 4 

-f flifqtsc 

i y^t±Ti:«y, fiiiyuEP^-rso 
EP ¥ C f'J ffl L 4 *■ o fc 4 4 V * I* if- 

^-uumsttSo 



*yr-?>vttx y *>, ifttiSirEP? 

->-7>, -v-tTv*, -(in-, -f 

77^460^7 KtSfitJ: t-r, 

C0J<9 ? hfr£ 



£ **#3t2J» L fc NEC r PC-PR801j (¥* 
4 kW^fflF). 

/f V9&S.-9 hySrjSli, tofflirfet’-cu: 

4 >^©SIS4 y 4£0 h ?7>***-?fc 



t'iiz4 >?&*.? ho^^-affi^y > 



011 ffvr^KttOfxi/MHv^xrh 




#Hto^?y>7 (•■/>; v*. 

X-/V '/©5a-f ? y n fc-o*£*. 

cni-Cfc*^*****#©**. 
fifP^iiS • itiEP^p D oR^BI^IcLTV^T. 

IP-13 0Klit'/fv'/KI-fy?i>i7 h 
*7 -f ^.CC®ia’5r»=6*-eieSj* 3 5r-7 P U V*tM\ 

**8W fcf i > * XX-X * b /<— V i->UzL—x * TteJ£V'--XCJ6x h , 
i «fc**7»j v^}R«i»(t0«**o»f yfcosm-t. 



• ¥*4 

NECOT* ; 7-ex=l-7y>'^ r PC-PR801j 
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NECcD r PC-PR602j (EP^tfiJG) * s * 4 . 

Hffi© 3 tf -oftb 0 4 

i 5 i: Lft {> ©ft, = fc;°-$S© <fc 5i:H 
- s^ftf'epj sij ?n4/:K), - 4 - y > 
^tW<x4. 

hf— 

(JM» *Ki:$e¥, fnT£# 

J^4«iU3ll'-«jC!)| > 0 o 0f^0}f 
(li!SrF’7A±i:Mt4#Si:, u— tf- 
e-A^5C, LCS (»*) LED (ft 
***♦- K) £3tftfc'*ft&4„ 
iffiliv— f-t'-At'*4„ ^ft^© 

EHEft <: =t 0 v-iK- 1 '- a^SIKJA 

±i:x 

*o»4 (Hl3)o 

LCS 9 4 yb*y b ®&j®S!>$.? b 
'>*?*— r«flUr»ifcL, ^fc-Sf^T-C^ 
® K'9Ai:flH§-3{f 4. 

LED #^r«, tt-ft u#fT- fc £^ft/J' 
$ ft HftjS’M * - K © 7 w 4 4- $ -B- 4 

4 t-r'®f^^f^4o 

'*-*'79 y *\ h «&*«!» 
t:mn-r& 4A:«>X^aRi*J: <, 32 K? 

m* 48 r * V © * Eu^-r s 4 . 

»t)t t i ^--y^ft $ lofcMUrti'fPM-r 
§ 4 <i t' i£ < , 

V'— ' f-t'-AC x 4^-S''7°!> >*!*, 
ffiffi ft fc © lilUm *» c. * o ft 
j ? v 3 ^coftif 4 a y**9 b ft © 
mLL-©li::2~3t©:tL' (¥ 

*5). ;©fc-r**ft»lft©fti:. 

ffif&iilOO»+7jPq** C>307 jR& t tTT* ! 
*Tt4-»fc. tr*4 0 

#^-ffcit-C'«:ft*oo*4. +-W 
^©^7-w— r-3t°r (¥* 6 ) «. 

i Ar*W^nf**W c tt * 9 - 3 tf-ft 

ft'**, t®«luftwjr3yif a .-^rt0>f 
>*7*.-xlj:t<M:fe^ftfttt-rft'o * 
t u 3 ^ b y t /j'afttfipoo *r* 4 . 

7°y >*©K££jE-C!tfta f , Jfyay 
ft * Kftftr * 7 0 © x tr- ft 4 

t < „ ft ft', .a O ft < m L (.'EP^ 

U3.tf$,T < 4 4 t in 5 ft !.'*>«> L<Xft 
l'o tfrfttftli, V— f-t"-A7°y >*** 
±S t ft 4 Hh 5 » 



NEC 




**05^®^— &■?') V 9 


** *""**• 


pc-PRBoi& 




3*iT*te*r«fi6*S«. 

c. n £ -etc M v * o fc < if L V'^a*Bjfi6 i * 4 


‘^py 



• EH¥«G -S-i>yiJ>^OT*»r«,NEC r PC-PR602j *1:1(5 SHS©LBP'>'J-X<&*1», l/— (f-e-A7p 
V* r LBP-8j(**/>') 

013 I — if — t'— *1*6 *7-3f-ro+-w> r u— 




NET 



WORK SOFTW 



ARE 



lij* m 



88TERM S 

suza* 



a«li98zL— 

tt/uo 88ZL— tf— 

v:7ht,3D3©-£-ro 

« «■«» ur < nissjffl osuTOtti'© 

-C-To^zr, 3Zr-[J PC-8B00'>'J-X 
utMBmm'j? h r 88TERMj rstBuizp 
* 161 52 ^-^*' 
6^A©*^P^t»#^Ur<^*Uo 



MBafeUSll 



i f i. A-o At, a«‘®#at'fc-a ! fcl6 
®^y a v-rftso Af'-^a'flrEi&o^y 
ayir-oA***. r^yicK'fS't:?? 
>xi:-fc*»rii*WiHtt«c£« A«{> 
¥»t, uts* >**.-» tmmm**) 
nif. 3yii#-rto 

4t, ^yavaflro+rfcjftfciiL*- 

< 3 5 3-->r-i/ 3 

*•? * - A-r-r. r i -c l 4 *. ur r*f-f 
«j ft* 5 , #x#t-rnif, ©.x^-rfs 
Aa*iifflA0X-A'sK?^xi:X ?-t— s* 
tas fc^rto 

*«A' t B#Wi> } i>*i>* •> asr * u 

77-77x1: in, ®mmc>nii-o 
i fttiursfy 3 1 1' 5 fe it-r 

to afct'ts«:*fci'a»r (^ 3 ^ 
aeeia t }£#f t x a w nur «.* it 4 * a it 
£) -rattn:, xart* $*«■*«* 

**A < £*S*PSA'tt 1 i* 5 S#^©S«* ! -tr 
§, r-Z fc LX 14**0 Ac 

a« - 1 i-trs 4 to 

nt-y-,n4, *flr**fltet*0t't 

t* f , £< 

03U-t-i'gV4 ! tn, SIG T'14, 
Islt'ffiii**? i>oA* t*^**a-«*A60 
ft. 

4 A, S^03Uitr_J,g^5 

ft? 

6ri4 5. fir? h fc l4«ftO£llB± 



t*')7»*4 *-cmmtzz trto 

3 >a«tt*»=*JHr*-*a 5 tgp/r 
riifti'a-rt. v-r 

n£i$mfc 

Mctt, TP7t>i'aytryy'©J:5 
CIS L4» fc i* 5 C t ft < 240# RSJfMiJ-tto 
4 A t > 5 -4 v r- a a t' 14 a fl-ofto 
>tJS50i't**c», 
:fi;^3 yifa-jry-itTx y 
•C'ttAi't'L 4 5**. '*y 3 >ii#©pti-!r 
a t> *«s ti-ci’ *©***'-*■*- x. x 
*A*0fflf**»«LAfc©-t\ PHAi* 
i fc0*-*7- KSri* < oa-AftTi'ltlf, 
1**L. r-*t*&X{ 

- * a ?> -r 14 vmt k m « l a tort. 

A-s-Ci’-C, tiWB0A 
t-l4ii < , H**0J;5u«tt*«t*IB 
t>A<, 

4x4 t„ 

SOFTWARE « 
fcO£<<*/u 

^y = > ififi* ! & A i: A 4 i:o ftilff y 

y h A t ©*»«*$ n, »f#* j t- 

y^t returns— raastg^At© 

i*f,,/5 7 4 y^X«U't,0i>,7y 
-t-t'M*A< SAoi'ti'i 
tt«9ft-Ci’4to 

•>*- (iiwi:ffA* , «e 

**'lt6), (iiftWAID 

a*apitlneti:a6) 

tii* <c>, I4fc At'0AiWy3^0tr-i 

t^-Kfraotoaaj: ^ajk© a@ 



y7Mr0Wi:H*tlHi', *LAtV 
4 to 

iififfly y Hife*Ay-t-**c>£< 

©M!®ii } %TC 3* 4XT I* 5 Of g tc ft A 

a«. *a«ra*caj:i ti , r>4t. 

PC-8800 ') - x'ffl t: liiiM y 7 V t L 

Ta+ttAaa^tai’tt^BA hplay 

NETj (XjBSx^^t 6 ,800R), 7 — 
7°B r JETj t-»i:A-9-Ci'ft fcor, 
%B‘C*Xt'fc*l’«»tl' r JET^-5ty<"< 
7j(*79-7# 22.000R), PC-8800 
y-5f^HHI«:»e0 r 88TERMj (7x# 
- 12.800R) At'* T a!>4to 
4-0 - 1 4 © 14, PC-8800 -> ) - x" 

ffl 0 a*y 7 FtlK*feMi’« r 88 
TERMj fto 



r 88TERMj BSC 



^y 3 vaau»ww«tt«^K l i '5a 

A I* t 4 L A* f , 4?f 
4 ^0tfcy-rto «B. 
yfy3>4-oAlfl^4<-*A’ltA0-rto A 
oA3*0ttt'fetf<x-Ci’6«i|iA-feyt 
4 yy'-c't. 
r 88TERMj 

raK-fS, < A of 

i*4 to 4 A, •? — jl 7 yi/ fe 2 #0 5 t> 0 
i *14-7 > tfrwmz n, m^r. t> 
D^ti’4 5i:AoTi*4t« 

4 1, yy bkzt>±irz t r ASCiijX 
^t^wusru'Ctuts 4tif*i), 
*fiW>»ai0«II4Io X *svf»-c 
ai’^t < Ao-a*4to 
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iiffiy 7 h s *> c, ,t <* iWiT^ s © 

t'lifcti'Ot'-r. il 

itmifi o i-B-A-o 

HNROlB6lHi'i'4+**, cn-frLft**^ 
fcJjEU'RSfelrfffcftWWar, *«r& 
x^^ARsrsJScfofc 
&.L£t©*'**t'to :w, atvcs 
£ L£t (¥*2)„ *y h 7-7flWR»:li 
3 fiRftD, £t*y h 7-7£&-rto 
HELP#- Srfft t 

* f ^?n.4 0-tr, *-y^5rili*>L r M 
odifyj C-g-fct £ to RETURN 
t t Modify **m 4 CDt, 

r Com. Settingj (: t — y^^-g-ibt £ t , 
*y h7-7ft&t£;£jlj®a»*^3tt4 0 
t'«R, tlSfrtfcAft, *- hTM+A 
(aftftctBfcft'tt&ttllB) ©IfcSSrL 
£ t, 

;nr, t'Oiy K-^i:ttt5i- 

i { ! 3 >' t I iiffiT » £ to-r, ft C* y h 

7-K(,257^- txaM V h^A*t 
st^it'i*. *«*•< 
t<«wrto a«^«oR£bft4(at' 
^-y^VR^LTa/i-nttJEf* *©t\ 
aaas^tfyMi, *h?r t'?n, 
XON/XOFF it', iiftt afflf- 1 ©iifl 
£ft©iS::E4-l£T (¥*3)„ 

*L*Ct> 5 l^tt^-StHtSKT't**, 
w tttt PC-8801ffliJ©IS:ST', 

5 iii®^- K©fS:$T'to 
88TERM 

1*4 >tttt (giJlftClD 

*^^X7-Kt-A*t*«ft) *>£* 
©f, ID 7 - K 4 t', A y h 7 

-^i:n^ Vlfct S(:fc£o-CA*t 

4X^%-is:£LTfc< ; fc**r& £t. 

T't* > f.y7 Hrfc*a»rc*y i>7- 
7 £31^ It RETURN ?> 

5*y h 7-tCAnT L£ 5 0ft 



PC-VAN 



S-Cuii'i^y h7-^i:*«rto 
B *«*©-&*&*■»■&* y h 7-7 
NEC © r PC-VANj i:A4:ti:L£U 
5o77-fcXsiW 7 t l££H86*t/r, SIG t> 
80ELfct i>?*gj£i'¥as t r — 
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-Cv4t. 

ii m % i: PC -■ VAN i a tf RETURN 

r^-a^-aj «B* *•»«*) 

r '>»/wyu— yyi/— j (*B03-^f) 

r t” J (|M*lft*) 

r *'-j (ftAft*£>*>&fti'lt£St') 
7* fci'5 4i:KVF>*AtV&4to 
-cb, 

T <•' T b - 4 *>#*> 6 ft l' ® 

■rK+F+i/trt. 

WELCOME TO 
C&C-VAN 

:( DS v-t-iSi)' l PC- VAN li#l 4 U 



4 to t LTS^OttJIWFJ'FviK**^ 

xi’Sit. 

ID#^, ^X7-K tA*5nTl'§ 4 
-T (*-ho /4 yfttfti’Aliiit'i 
< U*tH>-Ctti'lt 4 *A. 

;& — KibSWE®/.:* r See You Againj t 
ft 5 4 t 0 f)ofiftl©iiffiB$l- 7 o n 7 7 'f 
^®Sl«5rL4t Q*|n]*><ili^M* J ftiJ 

wraftrs o 4*A>.a* 

y7hlTSA?A*ftR£frlft<!><::. ii 
«L'C4t'R3if**t*5t'Lji5»'F, * 
y h V — 7®-£At:life*ft=» ytfi— * 
Wo-CiAi'i'JOf, «¥iMe*.fti' 
A**b«*.6Afc«*-c\ 



*JE, 3 -?yKM ®**4 SOK^*** 
®®*-£rt®r, IB*dL6 tl4**®A 
*M y-t-^ftBtftft < ft -a A* 0 L 4 to 
4 ft, c w -r© ts^-nn^ **ia«> * a*>m 
ftfti'Ai’f^-^SrlaA t § «:*jR 
Sft4to 

PC-VAN®>ia-i:AS fcl3C#*> 

nri'-c(^H 4 ), 

SIG, j^3 vV'srtf g, JLfci'b©*'* 
^4 to 13®>-j--fe 

*«:4 A'0-* i n-Ci'S®t'(¥*5), £33 

t ,g. 5 14 e ft o r 88TERMj Ii T ? 7° n - 

FWIB* 1 **®*', li*-©7-7“n y 7 h 

ifi©MM-rtta) Sr&fsf$i:aUc i* f r 
& 4 tt, m?x&®mbt>t><D-C') 7 » 
*4 4 to 4 ft 

r 7 v n - KttfiE t> * 6 ©rmt- y 
SIG®F*i$. £0fllL©r , -*a J £ 

< fcJLfci' t Stt, t '4 xyi:*fc IT* 
tt'7-7 , By7hm/'!), ryvi- 
77 h LfcO fcf» 4t. 

ti: 

4-aT«*UfTJl4t. 

7 d •J'E’ — rt ©7 7 -f /► j ftjBBfttfcl? 
ILti'T, i#|H**SuBffi©;£iTi:<S^ 
SttTi.'4t©T\ iS<i^]* f t 

d, asswa^aAmaftoELft*^* 

®tui'?:t * T ft < &W < 4 T** '7 h 

7 - A L * 6 ©fto 



3 &aPfiffi 



BLhOi 5 I- r 88TERMj 14 PC-8800^ 
J-x'ffl0lfy7 h t LTIi, £1*Wt: 
pc- 9800 S' y — x'ffl ® y 
7 v b ft 4 0 JL£ y L 4 1 A. 3L 

r-f ^**ftaL'Ci'fti'©* i ^^®ti'^ 
t L 4 1 * J , 88®<&«tair#iL« LltH 
Lti’fti'04*, i-AoTi I'Oflifti' 
**fcJRfcti 4 t. L*»l, -#©»£fct.'jL 
14, 3frg0i 5ft7tn^®K(riafc* 
®^(:ii->77°;wftigi®a J 3i*'*-fr*> y t c. 
i’MU4to 77-t-y-y a^i'-ci'-cfe 
tot' 0 014 5***1-1' tgo®li7#^ 
-?ftAf Li 5 ** ? 








PC-8800S/'J-X£flSfi*HE 

MS-DOSCDglSS^^X^BASICr 



/COSMOS 

nposMj ^§3ffl’ru^»o 88±r© nu-basic ©:? w ji/iss 
etf v hiffiiwz ur u i v^-iur^o Uieru *is©M#©&;ttiz 
«, basic ©wiinr 5® L ”'^< < £ 

basic © ittfinitijt«Ms^^ 

□^ZirTo 



* SSttMS-DOS/ 

• • 

<■' i , 880®J|6]0 1 o t L T, r 4SJ t *• L 
T98Ci£r;:5j fcta t>©* ! £ D it. 
^'-K9*^tt'fC-88VA0aS|, V7 
^x7fli r IDOS88j 0gi#**£©^b 
r*a ti'is-rij: 5 o 
ifc, r IDOS Tools# ljCJ *>, t'«£ I' 
i I DOS ±-Cmi¥? i BASIC A 'si* 7) 

Hi) 1 ') y-xsnj: 5 1 i-ci’ito :n 

r J: 5 ^ < N88- BASIC 0774 

awn*. 98t3tK^A'U*+*fe»rto 

5 T, IDOS ±1* BASIC * 5 ® < «fc 7 C * 
ofrfLit. L**L, Zti-CtiMftCDr 
A X* BASIC fcffil'AH' i: l'?^* 1 * 

aotrt. 

IDOS, ft a 1*0 MS-DOS 4r4£t,'1Rft 
-C, BASIC *»*• L tz 

^07/4 /v&41s0*ffi& 

?.£>!> it A. BASIC ** IDOS 0 t> t r 
7u-Y7v7Uzl ITf ii^0f-"^ 
x 7 BASIC tt i L t>&JI LTi'&i.' 
©ft. 

jfiS0t^ x 7 basic omitmm. t. , 

Mi *' L T MS-DOS Ci£-t 0 a Z t **r 

Sii’tOfLi ?*'. 

:0i5 &W».r COSMOS * f f£ c-ni 
Ifco COSMOS O, 3iS0t"^f x 7 BASI 
C iriljft L, * 4- MS-DOS 

ufi-twsi tfrgwttss'xf A-r't. 



‘ cosmos©** 

BfiUi MS-DOS rt. MS-DOS ©I±4t 
Sr l £**?., COSMOS 04±4f «r 49% 
LTl' < :ii:lHJ:5. 

49S]=^U->I^r5> 

MS-DOS, IDOS Ufoi'T, 3?0gC DOS 
0ii?r«it4/;>!»0a^>' KfrSOo 
0a©O, 777 K-f 777i-7 fcuflf 
4lJ7 , B/7At't. :07“B/7Ali 

DOS0±^*‘iili»ji:Ltfc!), 100 3 

77l'7r 'f/vfc LTi7xfAfM x^i; 
ffltsnti'Siott. ®.h.uz7tA 
L-CfflE^nti.'S A’*, ^<-i7' a > 
7-7 7°LA*$r Li'3-7 v 777 x-7 

IWSLMtS: t* ? r* abort. 

7* A x^ BASIC t*B77F4 7^71 

-xi:4lSt50li, R0Mi:^l5nT 

l'S77'J-7Xf<^t't. :0X7!) 

-yx.rAinz, cb*'C,i£^agSc*0;|g 

m&ma-t a fc»c, 

CL it. 

^©itfSlSH'frfc 100774^1: LTx" 
4 x^±Cffl3t L i to r/ x^ BASIC 
^0fe0lf4^D$xS C t < , flX7 
BASIC u- K7 7/ 1 5 6(trto 

w ©Ji^fn ^'7 AA?y xn© r COS 

mosj rt „ ;0 /b/7^ cosmos c 
1 i&comxir^lt&z fccLit. 



it, 

t^T© N88-BASIC Disk version 0± 
TMttTs-fc. 

B *t§ BASIC ±r t. «J < ; L * J '£'S. 

&C, 

St#© BASIC 7° b 7 A t $ b 

0 & < iWta /w»Cli. 7!)-xi)70 
m#**'l'RC»*.fcOM«c U it A. 

3&c, HTi:^4iSg4r^i: 

fccLit. 

1 F , 3SII=IV>H:<i:^g|I=lv'>K 
MS-DOS, IDOS r tt, B77 1M74' 

7x-X|#iU'<Oi-0377F^ilT 
ta»fig^4#-oTi.'it. :©377F^ 
F«gS0 □ -7 yKtnftf it. £©li*'C, r' 

4 x7_Li:|I5ftL'B77 K7 7 4^i ! 
£>!)it. 377Fl7i:o|, lo©7 
7 A ^* f £fl£ Ltio'f ^-7S V A s fry 
i-X** 50 ottfca- 7 VK**W» 3 - 7 j/ 

rfftl'tS. 3-7>Ktl^«077-f^ 
x^*>C, n-K$ n* 4 f 5 b.it. 

Cbf^gpuvv Krt. 

4t® = -7vKtv>7©li, Sftrt&fljjgr 

t. 7X7i0«^li'C,l'( c,ri> 
i^^ta c t* s r5 abort**?.. 

X'V x^ BASIC rii 3-7 > Klit^r 
l*|S|5 3-7> Kr*a ti'jL it. COSMO 

5 CO, BASIC 0*r*C*fL < *5:a0l*lg|3 
*’fV:Kfrj*KL, ^^^svcomm 
f!t «r4xit. W777F«:^ti'<« 
rt. jgJuLrf^ori-’ < ^ t**r& it. 



^014, 

■oX, -7xta t IT* tite y©fc©i: L 
fc^fcOl't**. «FlB* f « < T 2 1IC t 
t'feHf: c; X F 2 t y x F 3), 

E 7VWA?7'0l/£l/0'J^tl7^ 
h 

*-,t*-F\ x7y-7,7°y77,RS- 
232C*«0mi^fcAffl***«r.*'4 
x 7© 7 7 a * t RMua 5 mam nss- 
BASIC -C'litt'U^JgS tiX t,' 4 -to 
A* t *. If, ”SCRN:” t 1» 5 tm X7 7 A 
/t'frOPEN L, :©7r^i: PRINT# 

j ppuT#t'f , -^*m*t * t, a#© 

PRINT 

vcf-^i'jwsnito 7r^« 
t"LPT:"t tfuf, 7°y 7*t:iqLf:$*i4 

to ;©J:5u, 

7 7'fA'fcLxa 
? ; fc-r#^0L*»fc«rto & y s#fe© 

777-f JU©# x^-fto 

MS-DOS, IDOS-riiS & C, HUliAtiS 
*t^7#;L:fr* t I*fflSft'C<.'4t„ *A 
*>i*-rf-K*>£X3=%-A#tS 4 5 C, 
77077 t XU** C, 7-'— i5r A* LA 

y, ^a^^x^y-vcaiAsnsx^ 

5f7 # 4 7.^077 A^dbtiLf:>)ti z 
Li'XZit o :®i5i:, r Ao?/j:c>* 
-jK-F'**&A*Ltx7y-7i::ffl;fjt 
tAiii;/jt*77'f'>'tlimAffi 
atifci^t. asiiH^Am*®7r-f 
7*tt'*-!K-KfcX^!J-VI=4r3-Cl''C, 
:ix5r7 , !l 7 7^7-' 4 x7©77'f>'K:^ 

et s *©-rt„ ;©*^?ri/ 

O IJ7MU7 F t«¥tf4to 
COSMOS C 14, C © I/O y ?A 7 7 F 
©Ht«iffc*«: fc£L4t. 

3 A'7^®adx>7b-S 
MS-DOS, IDOS-rii, 3-vvK?ri'< 
ofc 4 tsb-C^fttS^ 

Wito COSMOS -ru, BASIC ©$&& 
37VFIf/n 
7*7 A i; L r RUN tftlf h tit*'*? t«S: 
at t£ y 4 to 

T771/- F ti'5©tt, St4i:a-» 
7 Ktf©Ay3ffl©x.T^ 7® c trto 
BASIC l4 3-?7F’f$*>©:R!i**77i'X7 

y-yxf^ 7-r* y , 4 a- help *- 1 
#t tain: A* Lfca-»7K1t©rt$* T 
!)S^5ns 4 5 i:fco-Ci.'4ti>* 



c,, t < i:#i5: t!4*y 4-tA„ 

COSMOSIZJS«US:U«f|g 

yy-tM 77 h y, 

M^, 'MrtV^fc*ttl4, COSM 
OSVer 1.0Cii4t 4tA 0 ;<xC,©it 
tfttl’OUtffcMli fc-rt**, 7"B/7A 
ira^H:L, 4 4 ^ < N88- BASIC 
SfccT-tiPxtS&tetftoAaizL, 
-n&l4*ttL4(i’C ti:L4t. 

MS-DOS t'li, JtSB ^ ^ K**I4*»©^ 

SBa-vyKfco-KlT^fttS&t', 7 

< Ot07’B^7A77'(A^|Blfti:t!) 

iiA-T^fftSr t* i 'C^4to Cftl4fl- 
Sa77K^B-FtJ7FVxi!#SS 
tlXtsC,-r, t'ZCn-KL-Cfe^ffT'^ 
4ti'7 16 1' 7 F CPU ©*$ttt£*‘ LA 

mm rt. 

COSMOS t: 14, ;: ©«*&*«« L 4 t. 

K©7°a^7 A7r^f^iit 

'■st y n^r— ^^vcinxL, 7*y±© 
1';(:b-FU 4 £frt* & s i 5 1: 1 4 

to W tLt; ct •? , J'FnB 37>F (4 **© a 

^>F77'fA«ro-KU*fttJ: t 

**•0 4 1, 

L*-L, * 5i'5inl* , t'& s 4 5 £7° 
B/7AII, t#i*»t'S*J:5Kffi*L«c 

* { ?>ftse> Attnif a y 4-tA. bl— f-*» 

a#t'*Mt3-»7 k«t^ 6 t s>c, *4y 
4 7 ^«r, B77F7 
7 A ^©JE^tSfcfc < Tlffc y 4-tfAo 

MS-DOS, IDOS-rU, 7 7^^ 
4 x©Affi*4fc'*CFfc 4 tst>©-t7>- 
f-7i: Lf* y 4 to k 7 t 5 4 t X, ft 
t*>e>*F8B = -*7KtflsS t §>i:Affi*** 
«P«i:lTii5J: 5 »:?Co-C<.’4t. 

n.itu * ? & cosmos rii c ©«#g i) if 
«L4i'C li:L4t. Aaiyj^t'liittS 
ROM ft*-?- 7 n -/i/ L Tfit' 4 to 
L*>L, ROM flA'— t7i:li/j:i.% COS 
MOS < o*>©*2;at:ot.'-tl;i, 

HoB 3 ' 7 ' 7 K *» c,! 1 ? cFtU LrOiz. Z £ 5 C 



#JtL-Ci'4to 

1 COSMOS# 

I mr?z>mm 

COSMOS ii, 88©t^t©Vl/V2 BAS 
IC _htfib < d UrB*«:L-Ci.'4t.7*y 
7 7 J PRS-232Caffi-0Sli fc t «) t N88- 
BASIC KTi'4ti'C. MJS® - 
^grto f^7ll ID, 2D, 2DD, 2HD, 
8l7f2D, H BASIC LtfliS L 4 

to 

COSMOS <ft? A X77 r A*li. 7X 
rA^iUot, -&®m®^SB=-^7K 
■7r-fA'tr»*U f^7B-Fi:«i' 
•oSi'^4 > ipx.4tA„ tfL^tn-ui-o 
t, esca S <i A* tv X 7 BASIC ±XiU 

fttZJ: 5(:LTi'4to 
COSMOS 14 r BLOAD, Rj f Jg»)t * 

: ti:L4to t'/f X7 BASIC ©x.-r 
4 yr^foTIDt7^Ift^tn 

if, cosmos ©t- f x ft- f * ? a^-rto 

UXh© 

I tTBih&fsm I 

® N88- BASIC V1/V2*- F©fl X 7 
BASIC teU) L, 

How many files ( 0 -15) ? 

C 14 RETURN 4-tff L t < A'? 

® CLEAR, & HBFFF © 

MON © 
t£frLT< A'$i> 

®y x f i t si4, 

EC900 © 

y x F2, 3«riT%atf t SI4, 

EC000 © 
tA*L-C < A'S i'o 

®y xFtA*L-C<A'3i' 0 ROLL UP, 
DOWN *— fBItX7n-^9tS 

c t**rs 4 1 

ESC A-—, CTR 
L-B *- 1# L-C BASIC C t, f y 4 t 
©y X F 1 t-fc-7't 6 L § 14, 

BSAVE” COSMOS”, & HC900, 

& HA2C © 

y X F 2 fc-fc— 7't 6 t S 14, 

BSAVE” MKCOM. COM”, & HC000, 
& H444 © 

y X F 3 t-fc— 7't Z> t £ 14, 

BSAVE” FCOPY.COM”, & HCOOO, 
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& H527 © 

X < //Si’ 

y x F 2 t y X F 3 0 7 7 4 C &■& 
t**$4^T< a*? i' 

©y x F A®l£— 

B/7A?fU-FLt*ftLt < //$ l'o 
F X FI, 2, iJt&L 

T, ffrti&*5xa*&i'in*®LT < A* 
Si' 

• COSMOS#) I 

1 1 

N88- BASIC V1/V2*- 
BASIC 4®® L i to 0 *» BASIC t L 
i)'i I'itA. 

How many files ( 0 -15) ? 
ptt**4ftfrA* IT < //S l'o 
BLOAD"COSMOS”, R © 
r COSMOS **&«; Lit, /©Xf-F 
^ > F 4, BASIC ©iggj t |b]b# 

t- i ®*It t ftlf , COSMOS 
*-FLit, 4fti:liBASIC yxf-A 

F 7M 4«fflLT < A' 

Sl.'o 

COSMOS 4:6® L A t 9 , BASIC ©H: 
»B**T9ftit. 

7 **£»•*«> COS 
MOS it, 

n^>K©ffiU75 

• STDIN (rt#3-»W) 

D»tt]«*Art*y*M >^htJ 
[*S:]STDIN<7T-f X^y7°^> 
ii&*-*'-F'*‘^Artt^9t''-*4 
7rf^'f.AM4: 1 41® Lit. 
7rf^t LTIir"^ x7©77'fA'©li 
*'U,”COM:” (ii^gUR) iWli 
to t-fcy hf-7°*‘GOA*li^:nrt'to 
STDIN ”KYBD:" 
isi'li^c, 

STDIN 

1 1 S t , TOArt «*-**- F* C t t' 0 

it o 

i A, r OKj ***^S ftA t 9 C «. «V 
Artli*- *'-F'c{> if 0 it„ fr^u* 

F xr-M v Y-CmmW %')*'( vt 
FLAii, ffi&**©*iys4fi L i'Ai-> t 9 
Cli, STDIN 



iltt^tX7-)/7M:LT</'S 

* LT77f^ 4 1 ^ T Art U&b -o-M 
Ui: t, H«$lArt «*-**- F*i: {> £ y 
it. 

tV x*©7 7'f*'4«i*Art ttSIB 
t:ii, 7 7 4 ^©W^Bi'cA/it-s-Ct 

* x F RAM ©SJffiiCB-FJfil 

to F L 

A i i, A 9 A BASIC 7°n r 5 a 4 n - 
KtSt, ^Art©^-****^*!* 
f£tt* { *yito A-^* s A6ntLio 
At9i:RSy, *^A*B+-^-Kcfc 
£ y i to 

HHsArt^y AM v-A F SJifcttttT'li, 
*—tf-F'a>C>©ArtB STOP +— t ES 
c *-©A* ? W$nrt, STOP *-4fft 
t if id Art b *-*- F* t: {> £ y , stop 

A-©«!ia* f It6t.i to ESC*- B, ff 

LTi'6#*TlM^«rffjtL, *tt«lft* 

4BM Lit, 

STDIN” KEYS” :RUN” PROG” © 
ttit, tM X A_h© BASIC 7° n 
7 a rpROGj 4 n - K L T £<t 4 ft *> i 
t* 1 , 7“at'7A^©INPUTX, INKE 
Y$, INPUTS /c £TTi, *- t?-K*>C, 
'Cl&Zi, f^x^±©77'(A r KE 
YSj *’ t> * -v 7 A A 41%*ii AT'S'tS L 
it, 

• STDOUT (rt3B=«-?>n 
mfflmm&jj zvf'f va Ft* 

[*5S] STDOUT <7 r 4 A'tM X A y 7 ° 
A> 

ifi^x7y-vcai*t^&A-^5r, 

XA y-7i:fflrtt4 t |b]B$(- 77f A'''* 

Urtti: t 41® Lit, 7 7'fA'k 
L T B r 4 x A © 7 7 4 A © ti *> i: , 
’’COM:” (jlftHlH), ”LPT:” (7°y >A) 
* j isEffl-riito t-t7 f t-f^oairt 
BITS it A, 

STDOUT"SCRN:” 

*5i’li^C, 

STDOUT 

-T, n^airtiix7 y->c «, f y it, 

i fc, r OKj t 9 C t «ns 

asrtax^y-yu t'yit, ^ 
Fxt-F^y Frsnsmrtsry^ ^ 
FLAii, fBf^d'Oteai-fti'fci'k 9 
«:B, STDOUT At L 



5ftl)-C7^fX7- F y > F i: LT < // 

?l'o 

«lpflJrt«ry^>f- F LfcjRBT'fc, 
x t y - y^® mrt* f l5]n# cffbni t„ 
t'<t©77fA^?B-X’LtLi 5 
£5% BASIC X f — F7> F, fc-liUf 
CLOSE, CLEAR, RUN, LOAD U t'* f 3l 
iTsnst, n^tbrt Bx^y-ycu' 
yit, i a, n^turts-yAV f l 

A i i , BASIC 77'f^fcp — FL T*ff 
L Ai' t 9 i:B, CHAIN A^ftfflLT < 

A’gi', 

f?i| STDOUT” DISP” :CHAIN” PROG 

© 

ttSt, A/f Xt±© BASIC 7°n^ 
7 a r PROGj 4- o - K L T ?f *6 * i 

t* { , 

A^lit^'Cr'^f X7±©77'IA' td 
ISPj CEliksnit. 

STDOUT” •••” : FILES 2 © 

©i5i:, liaf-f x^©77"f^ai 
rt^^^f x^±«7 7-f-»H:«Hsmrtt 
st, iELi'mrt* f i#e>nt, 
as c t Lrt y it, 

• FDD (rt#37yK) 

[«(te] X7©ft®^is:^t 

i 

[*a] FDD [< F' 7 4 7'#^->] 

[, <f 4 x7*- F*>] 

ID, 2D, 2DD, 2HD 5 4 y t 5 - 7 b y 
v-rj x7gsij^ta:SLito t'^fxt 
-=e— F'©iU:B±i£©Jfit:i, 2, 3, 4 4- IS: 
SLito 2 D F 7 f f©-7 y yflilD 
t2Dt7j;bf, l 1 2©*W$rrt, 
F'7^7'#^4*i«&t4*', OSrH^t 
St, t^t® 5 -4 yf-f-f X/ai 7 F 
litfLTttfcfrffi'ito 

f-fX^i-FmtSi 1 , 0 415:$ 
tS t, 

©2D F' 7 7'©7 j/ yfii, 2DC|S:$ 

Lit 

©2HD F'7 4 7'©-7^>-ni, F'7'f7'C 
7*4 xt**-t7 F SHTi'nB 4 0^4 
x 7©S®4 S®i8U3iJ L T»S Lit 
(AA’L, t©iHDf-fX^i*-t7 

FSnTl'Tfc 2 Dimas nit) 

f9ij FDD© 

FDD 4 2 HD F 7 A 7'©-7 y yfl 

iTtSt, 5 -4 yff>( x 7 F © 
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H, ^bsnri'iK? 

xf T'lsot'T, 

8 «ri#H* 8 iJLT, 

T'£4i 7lS:£Lito 

• DRIVE (fig|3=t-?y K) 

DMftB] COSMOS 

% o- Ft s K? a 7'm^-irmm 
tj 

[*5$] DRIVE [<F7xf7*#^>] 
fl#3-»7K**tfmtF*4:/«rlBfc 
Lite «$, ttSSa-^Fli, COSMOS 
■5r*e«j L/;7r 'f xu**#£t 4 F 7 xf 7**> 
0 ^0'ms-nito *i:, 

DRIVE 

its t, i0h'94 yr-t, g 0 jt. 
ffll DRIVE 2 © 

3 ® «£• ii , mm® a -7 7 F Ii F ? 
t ?' 2 *> © o - F 3 ii 4 i 7 i: fc 0 i t . 

• VER(fiS|5 = 7>K) 

[tt%] COSMOS ©'*- 7' a 7 #*§- 1 , 1*3 
*|3 3 3 - 7 F ©— ilfc^xRt 5 
[*£] VER 

COSMOS eui^ca^sti 4 7 y-fc- 
7'i|pJC^^$rfr<.'i t» I*|S|5 b 3- 7 F £ 

Jgttt 4 i 7 * >MB a ^ 7 F*«Mt $ ft fc 
ibtT'li, *tt3fifcrt#3-*»-Ki«* 
Lite 

• MKCOM (JWBa^vK) 

DUMB] W3^7F0^>F7r^ 
^4*t4 

[#5S] MKCOM <337 F£> 
mit® r*W53-*»: F©#*>2u c:*o 

T#0*lfc'<xf tV 7 7-f Xlx*'0, X77 

F7 7xfxu$r#«Lit. 

itt-<^Mt!)7 7^i'ii, att 
jt^ 4 i 5 C 2 Otto fc t ilf r TESTj 
’’TEST” 

fc «t tT’TEST. OFS”© 2 o©xM t !> 7 
rtxv^ffljtiito cn©ii|s]-©r"^ 

XjS'U-t-T'LTfaNto iLt, 

MKCOM’TEST” 

*&fTt4fc, mvrj 7 7±.i:”TEST. 
COM”ti'7 37VK77^«U 

to 

MKCOM XfWfct * a •» 7 KfcC It, 
&^tf>te36T©B5©fc o y * FfcoltTli 
uttitAo FtM 7'#4§-fc-o!t4C tli 

-trait. ifca-»^K«, iitt4^q 

t!!7rtxv® 7 7xfxu£|i, 



utuifc 0 it /to 
w wT”File not found”©^7— 
Sft4fcitli, HiJie®2o©7 7txu* f IE 
L < tfc^Lit. 

’’Bad file format” ( H *i§ BASIC tli r 7 
7f^07^-7yMi'iEl<0Hti- 
/uj)©7 yfc-S0fc*tlJ*Sti4 i § ii, \k 
it© r Jt-SCa-7> K®^t)^j *^0flT 

t'fct-c tfr^tit. 

W MKCOM” 3 : TYPE” © 

1 1 4 t , K7 t 7'3 CfflELfc'M t 
) 7 7 4 xu” 3 : TYPE”, ” 3 : TYPE. 
OFS”* 1 033-7 K77t xu” 3 :TYPE. 

COM’^t^Lito 

• FCOPY (W377f’) 

DUMB] 7 7-fxu©a^, *4ttir'^M 

[*5*] FCOPY 7 7 4 xufxf 7 7 

yt7>, <#¥*7 7 4 XU ?* 4 X 

7 y r*) 

7 7 t xu ^ 3 Vf— Li to Hfc4««® 
BASIC + 

USSl^S, xM tv 7 7 4 XU, 7 xf h 7° 

n t 7 h B#^-ft 7 7 xfxu, y~F 777 
— 7 xf h ti'ofcii»i4 %©i it*?5 
flit. 

t>f 7 7 © 7 y t xufc It T* fc <» ’’COM 
: ”(a«ia«).”KYBD : ”(*-**- n, 
”SCRN : ”(77 y-»,”LPT : ”( 7 °y 7 
7) t^tli i to 

^-*’-K?ra?jctt4l f *-A* 

f¥0t:fcoT;&-yxi/*0Sj*L 4 to -® 

tttt*’0*-*IT-9Tl’&, ltfto RET 
URN 4 f— ■ tresetr L i to &7l#CliST0 
P *— L fc© 0 RETURN 
Li to :5t4t, «¥£* f t4 7 7© 

7 7 xf Xu fc 0 , r#X h77xfxu**^®S 

ftitL, 7 # y 77fc0A*LfcPi#* I l 

tTtogP^g-t-ito 

m FCOPY”COSMOS”, ” 2 : COSM 
OS”© 

1 1 4 t , COSMOS © S' 7 t Af* 4 
xM t y 77f XU 4 -, K 7 xf 7' 1 *■ 0 K 
7f7'2-«?Lito ifc, FCOPY” 
DISP”, ”SCRN : ” 1 1 4 t , 7 7 t xu” 
DISP”®F*3^Sr 7 7 y - 7 L i to 
* 4 I' Ii FCOPY ’’LIST”, ”LPT : ” t 
t 4 t , 7 7 t xu”LIST”©P3^Sf 7° y 7 
7CPPt : Lito 



I ^g|J=lV>K 0 # 

| WOfi 1 

ftgis 3 3- 7 K Ii, BASIC 7 1 - h 7 7 h 
t |p]^0 7x<xut«!:a^1f 
l'it„ tt* 1 0^Si5='3-7K5f^4^ 
t:li ROM p*9xu-t7i:|I|T 4^* } -£-S 
-tto mcoi'ttt, f%^©SM* f *tt 
urifc©*Mfl=#L <«Httt4I teti 

to 

SUBS-ntt ,'iti'0, IDiifxr- 
1^71- ©fciiixu- f - 7 Ii# 4 w t * f t|! 
fctL-C, C infc COSMOS ©^bI5 = 13-7 
Ft LT^t4^®*iJ^i:ot i Tfc J ’Uit 

^4C tCLito 

W 377 Fii, #if^®r-t7 7 ' 
7 4-ffio-C#«L-C<fc^$i.’o 
•W377F0iteTFv7 

7 ° n 7*7 A ©ft® li F i 1 1> *' i t 1 i t 
Ao h 1 1 BASIC ©x^'xf t y 7 7 xf xu t 
L T BSAVE t-fe -7't 4 c t i: fc 0 i 
t* T , -t©t &©7 Fv7 t7°n7'7A# 
*0f©7 Fvx^jtoTl'-C (1 *‘i t'i t 
A, 7 -fc7 7*7©f|S-n-© i l't I 5 (St 7* 
Jx.x 7 h Sf #$t L i to 
fcfc L, ORG ^li y-xr^xt*!: 
fc fc 1 o t L,ORGt»£Sfi47 Fux 
tffiauSHL-CtilK i 5fc7"n7'7A 

tfc< Tlifcy itAo 

M377Fli, ^ftWte®B#^tli* 
fci'fcfxf 773-F0- ®©i 7 i: IT 
RAM JiC#® Ltl'ito tfcb t,8400 
H-E5FFH0F w* 1 !:#* LTi'i to 
; © t & 0—7FFFH i: Ii 7 xf > ROM * ? 
-fcu7 h $tlTl.'ito 

• y a7-77*xui:t4fc!0®Si)^) 

#* L fc7°n 1 7 A Ii, * 1 1 MKCOM 
^7F^(fli'ty n7-77>l©nlL 
ito iOfcftOWttt LT, <^0^ti: 
it*LT<fc'5i'o 

®7d/ 7 A*fg-S-g#©FHH5©7 Fvx 
Sr»t i 7 fcHHJ-, fc t i. ur7°n 75 a 
P ilfS|5T'fflS;Lfc7-7xy 707 Fu7 
4>ffiit7 Fu7 2xfc h titt i 7 fc^r 
t©7Fu7tLT ©SS:ffiSf 1 7*4 
ttoc^-SILfcy, t©f|i:U:H 
Tlii'ttfct’(®l A-B) 

®7°b 77iliitI7 Fvx7*>0*tf?n 

4 t©t L, 7°n7'7A05tal!:®2© 



mi A *g&3V>K0>*IJff) 



iV/IMlHrEL Tte< £ t 
^'x* 

BASIC x r— b 7 7 
ti5]#-rto t&<*s: 

iwtstiui, i-raanttjLs 
«^X iST |i AF, BC, DE ft. i 0ft0 * 
it 7, Z km t 9U*&**fci&PUSH L 
Tfc&i-f. HLiir^x >*-T, 
fl-SB => v > KjgB»i: ii^'° 7 t - Z ©ftsi 
klBLXi'it. Mg*'*? t-ZkW.fr 
ihsh.1t 6, HLliXf-b^VhO^fcD 
kmiXi'itt'C,, ivmk&bitxt' 
tstmkfrix < Ar$i'. 
fc<>/C<i*0litSrHLi^x*(:fe t'LT 
*> 6 RETURN t&^k-gft L -OumkfcT 
LX (/'?i>o 

c;ai l 

(D ROM ft;t'-?ycr>«¥0 : lii L 
0-7FFFH Clitty ROM 
i-znxi'ZcofkcDii a-A-Lit 
© BASIC X 7 - b t y b 0 #f tffcb L 

^©r-7>©3fe 

SS7 Kvx^HL CAtlX, 

DEC HL 
RST 10H 

H1:<D-t>, x f— b 7 7 b 0 i> Y ) k 
= -Mit 

® COSMOS I*|SB a 7 > K 0 »f tfifc L 

© fc t-Zk&-<1ZT-7» 

©TKvx^HLCAn, 7 K v X C9CH 

® COSMOS »«3-»>K0^at 
* t T*j$^ * EXTERN fc l' 7 *'-?• 
HLi:^»37vrox> 
b y 7 Kvxi^tHto 
(EXTERN Ji, W3 -v>Rb- p L 

fc±, y «**- b*M*ff-*--c<fii-r) 

RETURN jfefr PUSH LX, 9 6 UHL 
3? PUSH 

&'< 7 .*-* 0 >iM y ^ 3r HL I:A(XT, 
DEC HL 
RST 10H 
RET 

ttti If, *bSB=<7y pfra-^Lfc; t 
i: ft 9 * T 

• COSMOS 701%** L 

COSMOS ii®U)B #0 * x r ^ 0 « 1 ^ (; 
io-C, B-KsnS7Fvxi'fi()L| 



JBv.'« *JWrKu-X*r7-KTIBi6LTt'«i:i' 



PUSH DE 
LD DE, ADDR 
ADD HL, DE 
POP DE 



ADDR: 



ADDR: 



HI B KOHtt 



■ «»XKLXS-ATfB»LTl'S 
LD DE, —ADDR 
ADD HL, DE 

ADDR : 



LD DE, ADDR 
OR A 
SBC HL, DE 



0 2 n&=T?>FftljLBt<D7t-Vy h 




0 3 C0SM0S'>X-7- Af- 70KDrt$ 



((EB16)-1A) s 
((EB16)-18) = 
((EB16)-16) = 
((EB16)-14) = 
((EB16)-12) = 
((EB16)-10) = 
((EB16)-E) = 
«EB16)-C) = 
((EB16)-A)=DRIVENO- 
((EB16)-8 )=STDINNO- 
((EB16)- 6 )■ 
((EB16)-4) = 

((EB1S)- 2 ) = 



= VRTCAD (VRTCAD) = VRTC#J lj V h IJ 7 KUX 

VERNO 7'KUXVERNO*'^<-^ a >#-§-ro++777x-7'1.0'*''M. 

STDIPTR (STDIPTR)=#*A»/<y77»*a*4>«)ttll<2)7KW'X 

; EXPAN 7KUXEXPAN *'b*1-«=l7> K©*HK?- 1 COM 

COSMOSIDAD 7KUX(COSMOSIDAD)A'b[6, 'COSMOS ']<Dx-^^afe.j>' 

COSMOS = cosMOSjfeasr KU-X 

BOTTOMAD (BOTTOMAD) = 7fS537>raiJ*tTfi»OTX K UX 

INCOMAD 7Kux(lNCOMAD)*'ibrta!a-?yK©a7>K«fcfe]l£©7'- 

{ (DRIVENO) = ^S377K|**!ULK7'f7'#^(1~8) 

\ (DRIVENO + 1 ) = COSMOSeB^OT Kx-TX## ( 1 ~8) 
f (STDINNO) = #2UA*OT77~f;L## 

1 (STDINNO + 1)=**ffi*«)7x^#^ 

STDICRLF (STDICRLF)=#48A*TCROT*troLF«-*S«L4X'777J 

FUNCCALL COSMOS 7x>7i'a>a—A'©a—2l'Jfc7KVX 

■»'©**a-K 8F49(->7MS3-K) 



(EB]G) = ^X7a-K©»fc‘J©7KUX+1, BASIC 5^;u««IBte7KUX(A)a:,7KUXAC**'nfcx-^*L, 

((A) ) St, T Vl'XM'htol'H HX#*'ftfcx-?*7 KU-XB t LtztZ, * ©7KVXBC*6'ftfc7-**** 
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0 4 K^£B#<7)7*--7-y f 




v'XfrftsAracii, i-rv-?3-)7 



to k<Dte*>V-93.') 7 !)»Uf. 

Wa-ryFJ-C, COSMOS © 7 - 7^ 
!lT«rfWr*fc»i:. ®30i5&S7* 

f to A-SB3 

v 7 Ktii, i t*IOl : (EB16) tT^S ft 
S7FvxJ: *> t®026/<'f hfrg#®7 
-^iH7i:3t'-L-c<«i'o ;:i: 
li, 7-^*J70ttI«r«t7Fvxi* 
afc^&ftTi’it. zft£®7 # -7U«£& 
ffitAftt-f, ♦ S&i'Cta&yjU:**) l-t 
4.0 7-7x.y 7fr®l>&;LS t Stt, Z 
ft£,©*tt7 

I' 5 'P« j&ff U ¥■ If § t „ 

Wafi© EXTERN ZOr- 

7> t © FUNCCALL fr => - 7 K w X 

fct*A'-*>'t't(H3>, #L<l**fc 

i to 

#F*3gi5=2-7> K©iitS:t:oi.'-c 
frtsp 3 -7 > 3 > K fr J*K l A: 

t>, *i:flM»PiLA:!>t*i t fc-rttfto 
tt4r©&&dA.©X3* ( 
*ftl * i A.*©*4H:«W! Lit. 
•iM»3-»>F©4tf; 

ia±© i t fr L 4** 6 JMB a > K 
©rfro^AfrftO&jLArS., 
®W¥037yF2fr7r^« t l 
-C”BSAVE”1 'x*4 X7i:-t-7*l i t„ 
77 4A'*«:teSm*'3i#4i'J:5e 
(Dv-xf *x f©ORGffi£«r~Ftt'M 

ftv< r*>7Vnii:t 

it. zftfr, ±ie©7 7 4 *45 1 :” 
OFS” 1 1 ' 5 telffrolJ A: 7 7 A *45 
•r, (DtHcr-f x7t:BSAVEli t 
®ZftC,©77'f ^frJ1-®3-v>KMKC 

om -rfeat nur, i£3gT-".coM”frf* 

03xyK77^muto ## 
©Ar»iz, %®Lt3 7y)f7 7'lA'0 
7*— ? ? f fr® 4 lisSLit 

I COSMOS 

§ IfXTbsr—Vfc 1 

C©r-7'/Hi, COSMOS 37 xt A© 

*&(:** fe©rt* 5 , ^3^>K**n 

— F®ft*L, fr©£ t i:3tr-3tti to 
:?LT, Z®t—S' f *ttftK (EB16) #! 
#J©26'>M H:#ftLito t- 7 r *©Fi 
#!i®3 C^Lit„ 

t— ^©a**i:tta#*T©sft. 

Az t x if, VRTC fi] •) ii*©^> M7K 



EB16, 7 U#a»ftA:7 KV x frSfco T & t 
26fr9IS, KU©*©2/f'IM:ti)' 
*iA.*7KwxfrJRoTSito Z©filfr 
VRTCAD iUt, Z ©7 K X (i COS 
MOS 7-7-x.!/ 7rtfrttL-Cfc 0, frz 
l Z<D<k<D 2'* 4 V r-ttt)'titz7 Kvxfr 
JRoT < 5 t J: 5 * < Z ft* T VRTCfi] 0 

a*©^> m; 7 Kvxtrt. znf, ® 

3©t5tA®fr3Sf!?lT i> tiArTl J: 5 *’» 
rii, ®3 U^$nA:7'-^©UiBflfr L 
it. VRTCfl]^iiA©i> f y 7 Fvx 
*\ E808-T 4 1 ' t & IA H *fg BASIC ft. 
5 f>i:B*fg BASIC -tr t> frfcjjtC'S 

y ->■*— f 3 , 4 -r* 5 *> t' 5 *> 

frSlSi:lA,7 F v X 8570© ft#* 1 3 , 4 1* 
*s*‘fr?f*>6?>ito 
femklut, fU X?t'C,(Dt£&<D * ft 
#frt-*T^«y tztt*&A.f*‘6ft©fe 
3®~» Hit, (STDIPTR) li, i 0 X * 
y©ft#frii*ajt=iw v*T*t (®5«> 
#M). r3fxl>RAM©5^Mfr«i' 
Ari'tStt, z©7Fw'Xiai*fr#»«i. 
Sci'-t 5tt*L4t. 

M-£B 3 -7 > Ka^afr » l T RETURN 
Wiitsnst, ^a-x> Kiis/x 
r A*-ii«Jif3‘4i'C7 ') -iy7i: «»£■*> 
it. fliy#-Ctt«®7F^xtt (BOTT 
OMAD) ©ffi-Tto (INCOMAD) t:®*’ft 

A:7Fi'X*>&tt. fi#3-?yK©Xm 
3-»ifF«, ina*7IVxi*3-77K© 
*cAfitiiysLWHvti'it« x^at 

L-C 0* f ®*-ftTi.'4 t, *ftJJltftf»3 

7yF4 ! li'Ztfril, FFVGi'tiX 



i'4t, HC!)t02/<-(h©f-^fr7 
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3 y3-A®3— ^i7hVxfto 3 — 
^©LWzIi* i titbit. 
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[exit] HL-*37yF77^frp-F 
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1 "Duplicate Definition” 

cosmos * t tt'csii)$n'C(.''r, $ 

6 CEB l J: 5 t U-Ui::0i7-* ! 

H£l*to 

2 "Syntax error” 

JMea-»>K*SEff L<fc ? t Lfct S, 

t:h©4^-**ffl4To 

3 "Bad file number, File already OPEN" 
SWSAttirt, *0f&© 77'f/*'T7-fc 7 

•trii, BASIC S' 7 r ^ * f ffl& L 7 7 4 ^ 
^-y77^foti'ito iQtzto, BAS 
IC7°n7'7A-c'77'f^?rOPEN Lti' 
&1>©4Z^<7 7yi ! £ *) & < && z It'*) 
o, f0^:®x7-i%Lit o 
i§£-END %-Hfi-l A’Ot,, fiT'An-fcyi 
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-*07 7 4*^fttfUI*,BASIC0X 

i 4T„ 

• stop px. 7 -©h^-tim* 5 # 
± itc t & i*. m mxabh maste) 774 

^y<777li7n — r Brea 

kj ^5-7 y-t-^iSJtrCii 
’ofcattt'tt, iTENDSrKfr LT**& 
S*ffLT<4f*i'. ;UT774^0 



mtl77 

A Ktm'.'lzt £Kir> t X 7® FAT* 5 
l&Ei&viiizteotbito k<D nr 
»(*, *fc*’<i 
*^l£©7 7'f 'v* KILL tfttfr' 4 7 

•r"4 7 7Wi>?,0l$Aj] tt^'T© 
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tts 1 fc***s**t L<tx4-tf A. 777 
7 * 5 C900—D32B i:*St&i:#^L4 
i-.BASICifil»4&t0J: ttt* 

Di-g-A*- ^A**-rt 0 4fc-*C OS 
MOS fcSgjL'C L4 ilf, :0««i:7 
7 7 7* { #Bl L-rU-Ji'l -B- A„ 
•ft^0WflsW*0«£-t\ »J^*?Sfl0 
*3 4 To RS-232C i5fg0^, 8 4 
7 n 7 t°-0^ x r A, 2D 7 A 7“0 0 

*» basic -ccommmmztix ^ * # 

Ao S t &ii, 74 777 

7 7 If 5rS,S L 1>*7 77 7 7” 4- L 
T *• c, 0 1, S4> L T *> c. L T < 

A'$i' o 

-Tii, COSMOS c|5ST 5 
LTfcO 4 to 



87 




UT+hA 



1000 ' PROGRAM : Memory Editor 
1010 ' DATE : 1987/12/10 

1020 1 AUTHOR : Atusi Ohsima 
1030 ' 

1040 WIDTH 80,25: CONSOLE 0,25,0,0:CLS 
1050 LOCATE 0,20 

1060 PRINT " 7 8 9 A CCLR] : Next [A] : Address" 

1070 PRINT " 4 5 6 B [HOME]: Back CP3 : Print" 

1080 PRINT " 1 2 3 C [Q] : Quit tF] : Full" 

1090 PRINT “ 0 F E D" 

1100 • 

1110 LOCATE 0,0: INPUT "clear address" ;A$:AD=VAL( "&h"+A$) 

1120 LOCATE 50, 20: PR I NT "CLEAR : ";A$ 

1130 CLEAR 300, AD- 1 
1140 ' 

1150 DEFSNG A,Z:DEF1NT B-Y 
1160 DEF FNWORD$(X)=RIGHT$( "000 "+HEX$(X) , 4 ) 

1170 DEF FNBYTE$(X)=RIGHT$( "00"+HEX$(X) ,2 ) 

1180 DIM HSUM( 15) ,VSUM( 15) 

1190 KEYDAT$= " 0 1 23456789*+ = " +CHR$ (13) + ".," 

1200 AA=0 :XX=0 : YY=0 
1210 A=0 : X=0 : Y=0 : F=0 
1220 • 

1230 GOSUB 1730 
1240 • 

1250 ' Main 

1260 GOSUB 1280: GOTO 1260 
1270 • 

1280 LOCATE 5+X*3+F , Y+ 1 : K$= I NPUT$ ( 1 ) : N= I NSTR ( KEYDAT$ , K$ ) 

1290 IF N THEN 1440 
1300 N=ASC(K$) 

1310 IF N=12 THEN 1540 
1320 IF N= 1 1 THEN 1580 
1330 IF N=28 THEN 1620 
1340 IF N=29 THEN 1680 

1350 IF N=30 AND Y>0 THEN Y=Y-1 :A=A-16: RETURN 
1360 IF N=31 AND Y<15 THEN Y=Y+1 :A=A+16:RETURN 
1370 IF K$= "a" THEN 1730 
1380 IF K$= " f " THEN 1900 
1390 IF K$= "p" THEN 1820 
1400 IF K$="q“ THEN 1950 
1410 BEEP: RETURN 
1420 ' 

1430 ' Data set 

1440 N=N-1 SPRINT HEX$(N): 

1450 D=PEEK( A) 

1460 IF F=0 THEN D2=(D AND &HF) OR (N*16) ELSE D2=(D AND &HF0 ) 
1470 POKE A,D2:D3=D2-D 

1480 HSUM ( Y ) = HSUM ( Y ) + D3 : LOCATE 54, Y+l SPRINT FNBYTE$ ( HSUM ( Y ) ) ; 
1490 VSUM ( X ) = VSUM ( X ) +D3 : LOCATE 5+X*3, 18:PRINT FNBYTE$(VSUM(X)i : 
1500 ZSUM= ( ZSUM+D3 ) MOD 256:L0CATE 54,18:PRINT FNBYTE$ ( ZSUM ) ; 
1510 GOTO 1620 
1520 ' 

1530 • Next 

1540 AD=AD+256 : A=AD : X=0 : Y=0 : F=0 
1550 GOSUB 1990: RETURN 
1560 ’ 

1570 ' Back 

1580 AD=AD-256: A=AD: X=0 : Y=0 :F=0 
1590 GOSUB 1990: RETURN 

1610 • Right 

1620 IF F=0 THEN F= 1 : RETURN 

1630 IF X< 1 5 THEN F=0:X=X+1 :A=A+1 : RETURN 

1640 IF Y<15 THEN BEEP 1 : F=0 : X=0 : Y=Y+ 1 : A= A+ 1 : BEEP 0: RETURN 
1650 BEEP: RETURN 
1660 ' 

1670 ' Left 

1680 IF F=1 THEN F=0: RETURN 

1690 IF X>0 THEN F=1 :X=X-1 : A=A- 1 : RETURN 

1700 IF Y>0 THEN F= 1 : X= 1 5 : Y=Y- 1 : A=A- 1 : RETURN 

1710 BEEP: RETURN 

1720 • 

1730 ' Input edit address 

1740 CONSOLE 0,20:CLS 

1750 INPUT "edit address" ;A$:AE=VAL< "&h"+A$) : AD=INT(AE/256)*256 
1760 GOSUB 1990 

1770 A=AE: F=0 : A$=RIGHT$( "0000"+A$, 4 ) 

1780 X= VAL ( "&h"+MID$( A$, 4 , 1 ) ) : Y= VAL ( " &h " +MI D$ ( A$ , 3 , 1 ) 1 
1790 RETURN 
1800 ' 

1810 1 Print - - — 

1820 CLS 

1830 INPUT "start: " ;A$: AS=VAL( "&h"+A$) :AS= I NT (AS/256) *256 
1840 INPUT "end : " ; A$:AE=VAL( "&h”+A$) 

1850 GOSUB 2250 

1860 AS=AS+256: IF AS<AE THEN 1850 
1870 GOSUB 1990 (RETURN 
1880 ’ 

1890 • Full 

1900 D=PEEK(A) : AE=INT(A/256)*256+255 



1910 FOR AT=A TO AE:POKE AT, D: NEXT 
1920 GOSUB 1990: RETURN 
1930 • 

1940 - Quit 

1950 CONSOLE 0,25: CLS 
I960 END 
1970 • 

1980 * Display memory sub 

1990 CLS 

2000 PRINT "ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A— i 
2010 AA=AD 

2020 FOR T=0 TO 1 5 : HSUM(T ) =0 : VSUMIT ) =0 : NEXT 

2030 FOR YY=0 TO 15 

2040 PRINT FNWORD$(AA);CHR$(28); 

2050 FOR XX=0 TO 15 

2060 D=PEEK(AA) : PRINT FNBYTE$ ID); CHR$ ( 28 ) : 

2070 HSUM ( Y Y ) = HSUM ( Y Y ) + D . 

2080 VSUM ( XX ) = VSUM ( XX ) +D L+B +C +D +E +F :SUM" 
2090 AA=AA+ 1 
2100 NEXT 

2110 PRINT " : " ; FNBYTE$ ( HSUM ( YY ) ) 

2120 NEXT 
2130 • 

2140 PRINT STRING$(57, "-" ) 

2150 PRINT "VSUM 

2160 ZSUM=0 

2170 FOR XX=0 TO 15 

2180 PRINT FNBYTE$ ( VSUM ( XX ) ) » “ "I 

2190 ZSUM= ( ZSUM+ VSUM ( XX ) ) MOD 256 

2200 NEXT 

2210 PRINT " : " ! FNBYTE$ ( ZSUM ) 

2220 RETURN 
2230 ' 

2240 ' Printout memory sub 

2250 AA=AS 

2260 LPRINT "ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A-i 
2270 FOR T=0 TO 1 5 : HSUMIT )=0 : VSUM(T ) =0 : NEXT 
2280 FOR YY=0 TO 15 
2290 LPRINT FNWORD$(AA) : ” 

2300 FOR XX=0 TO 15 

2310 D= PEEK ( AA ): LPRINT FNBYTE$(D) : " 

2320 HSUM ( YY ) =HSUM( YY ) +D 

2330 VSUM ( XX ) = VSUM ( XX ) +D L +B +c +D +E +F :SUM" 
2340 AA=AA+ 1 
2350 NEXT 

2360 LPRINT " : " ; FNBYTE$ ( HSUM ( YY ) ) 

N 2370 NEXT 
2380 1 

2390 LPRINT STRING® (57, "-" ) 

2400 LPRINT "VSUM 

2410 ZSUM-0 

2420 FOR XX=0 TO- 15 

2430 LPRINT FNBYTE$( VSUM (XX) K " "5 

2440 ZSUM- ( ZSUM+ VSUM ( XX ) ) MOD 256 

2450 NEXT 

2460 LPRINT " : " ; FNBYTE® ( ZSUM ) 

2470 LPR I NT : LPR I NT : LPR I NT 
2480 RETURN 
2490 • 

2500 1 End of Program . . . 



COSMOS 

— 



KQ9 

COSMOS 



ADDR +0 +1 +2 
C900 18 0F 00 
C91 0 00 2A 16 
C920 A2 03 21 
C930 ED 52 44 
C940 32 93 ED 
C950 02 F3 22 
C960 D6 30 FE 
C970 00 00 22 
C980 50 55 2A 
C990 05 28 0C 
C9A0 DB D0 CD 
C9B0 33 33 33 
C9C0 ED 52 28 
C9D0 C9 E3 E5 
C9E0 2A D4 C9 
C9F0 58 57 18 



+3 +4 +5 +6 
C9 AA 08 43 
EB 2B 7E 2B 
00 C9 CD 2E 
4D 2A 16 EB 
22 94 ED 21 
88 D0 2A D1 
09 30 06 32 
16 EB El El 
04 D1 46 23 
7E 23 DF 10 
50 55 El C9 
33 33 33 33 
04 FI El D1 
21 00 00 C9 
ED 5B 04 D1 
F3 3D 28 2D 



+7 +8 +9 +A 
4F 53 4D 4F 
6E 67 11 49 
D0 ED 53 70 
EB CD 0E D0 
56 CD 32 48 
EA 23 7E 2B 
43 D1 32 44 
AF C3 2E 52 
04 20 06 7E 
FB 3E 09 DF 
D5 E5 F5 F3 
El 31 00 00 
C9 FI El D1 
7E FE FI C8 
1A 13 3C 20 
47 4F E5 1A 



+B +C +D +E +F 
53 20 31 2E 30 
8F B7 ED 52 CA 
C9 11 00 C9 B7 
3E C3 21 A 7 C9 
ED 22 49 ED 2A 
FE 3A 20 0D 7E 
D1 CD 7B C9 21 
E5 21 99 D0 CD 
23 66 6F 18 F5 
23 23 18 E6 21 
ED 73 B9 C9 33 
FB 11 9F 0C B7 
22 D4 C9 21 D7 
Cl 22 0E CA E5 
08 1A 13 4,7 1A 
13 BE 23 28 02 



SUM 

25 

7D 

64 

23 

82 

03 

02 

13 

BA 

4F 

7E 

E5 

31 

50 

03 

FF 



VSUM 4C 24 CE D4 4C AD 53 



ADDR +0 +1 +2 +3 +4 +5 +6 
CA00 0E 00 10 F6 79 B7 28 
CA1 0 B7 ED 42 28 05 El 13 
CA20 E3 2B D7 C9 D1 D5 CD 
CA30 CA ED 32 8D D0 22 8E 
CA40 22 CA ED El 2B D7 CD 
CA50 CD 82 CB FI El D1 Cl 
CA60 D1 3E 22 12 13 3A 43 
CA70 01 06 00 ED A0 E2 89 
CA80 00 00 B7 ED 42 Cl El 
CA90 ED B0 21 0E D1 4E 23 
CAA0 CA 12 13 AF 12 13 12 
CAB0 32 2D D1 21 01 00 22 
CAC0 3A AF CA CD 66 CD 11 
CAD0 66 6F B7 ED 52 22 2F 
CAE0 06 D1 4E 23 06 00 ED 
CAF0 CB 73 23 72 23 36 00 



07 BD C6 04 B6 D0 A8 B0 E8 :B2 



+7 +8 +9 +A +B +C +D +E +F :SUM 

0D 7E FE 20 28 0D 01 00 00 : 4B 

13 18 CD El 1A 13 6F 1A 67 :FD 

58 CA 22 47 CA 3A C9 ED 2A : 90 

D0 3E C3 21 43 CD 32 C9 ED :E0 

00 00 C5 D5 E5 F5 2A 8E D1 :86 

C9 ED 53 80 CA C5 D5 11 4E :CA 

D1 C6 30 12 13 3E 3A 12 13 : 5C 

CA 7E FE 20 28 0C E5 C5 01 :44 

20 EA D5 21 07 D1 01 04 00 : 65 

06 00 ED B0 CD 83 CD 32 AF : AF 

21 4D D1 D7 CD 98 47 3E 00 :D5 

31 D1 21 2A D1 D7 CD 98 71 :3F 

09 00 19 5E 23 56 23 7E 23 :81 

CB 3A AF CA CD 9F CD D1 21 :C5 

B0 EB ED 5B 16 EB ED 53 2C : 8B 

AF CD 98 13 CD E4 58 2A IF :A5 



VSUM 8D E6 E3 5F E5 9A 55 57 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 
CB00 EB ED 5B 16 EB B7 ED 52 
CB1 0 IF EB IB E5 B7 ED 52 22 
CB20 B1 28 02 ED B8 21 00 00 
CB30 00 19 11 1A 00 19 EB 2A 
CB40 B3 03 21 4D D1 D7 CD BF 
CB50 90 D1 01 1 A 00 ED B0 EB 
CB60 CB D1 Cl C9 EB 2A 16 EB 
CB70 22 IB EB 2A ID EB 19 22 
CB80 EB C9 E5 ED 5B 16 EB B7 
CB90 B7 ED 52 44 4D El EB 78 
CBA0 C3 64 CB CD 7D CC 2B D7 
CBB0 7E 23 FE 20 D2 A0 4D 4F 
CBC0 D1 3E 22 12 13 ED B0 21 
CBD0 CD 83 CD 32 45 D1 32 47 
CBE0 4D D1 D7 CD 98 47 3A 45 
CBF0 7E 32 48 D1 FE FF El CA 



C9 F7 58 7E B2 A0 IE 60 : 46 



+8 +9 +A +B +C +D +E +F :SUM 

22 ID CB 2A FI EA ED 5B :81 

26 CB El EB 01 00 00 78 : 58 

CD 64 CB 21 00 00 11 00 :CF 

16 EB B7 ED 52 IE 07 DA : 68 

EE 2A 2C CB CD 2E D0 21 :53 

CD 82 CB CD 86 5A 2A 2C :21 

19 22 16 EB 2A IB EB 19 :C1 

ID EB 2A IF EB 19 22 IF :2B 

ED 52 22 9E CB 2A IF EB : 97 

B1 28 02 ED B0 21 00 00 : 64 

C8 CD D3 11 E5 CD C9 56 :54 

06 00 7E 23 66 6F 11 4E :A8 

0E D1 4E 23 06 00 ED B0 : 07 

D1 12 13 AF 12 13 12 21 : DB 

D1 CD 66 CD 23 23 23 23 :7D 

7D CC E5 FE FC 30 68 FE : 2F 



VSUM 37 DA 65 5C 18 IE 21 21 B5 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 
CC00 80 D2 A0 4D 3A 45 D1 CD 76 
CC10 52 EB IE 07 DA B3 03 45 3E 
CC20 18 EB E5 B7 ED 52 El IE 07 
CC30 0E 01 78 B7 28 27 3A 45 D1 
CC40 C5 D5 21 2A D1 D7 CD 98 71 
CC50 09 00 19 D1 01 00 01 ED B0 
CC60 CD 9F CD AF 32 45 D1 3E FF 
CC70 FB AF 32 4C D1 21 F7 CE 22 
CC80 FB C9 F3 3A 47 D1 B7 C8 E5 
CC90 D9 35 3A 45 D1 B7 C4 9F CD 
CCA0 32 47 D1 21 00 80 22 49 D1 
CCB0 C8 CD D3 11 E5 CD C9 56 7E 
CCC0 06 00 7E 23 66 6F 11 4E D1 
CCD0 16 D1 4E 23 06 00 ED B0 CD 
CCE0 AF 12 13 12 3A 42 ED 2A 43 
CCF0 21 4D D1 D7 CD 98 47 3A 46 



B3 86 21 A9 B1 8F B3 :F5 



+9 +A +B +C +D +E +F : SUM 

CD EB 21 80 00 B7 ED :CF 

80 95 67 2E 00 ED 5B :67 

DA B3 03 22 49 D1 EB : 9B 

32 2D D1 79 32 31 D1 : BA 

3A 45 D1 CD 66 CD 11 :C4 

Cl 0C 10 D9 3A 45 D1 :98 

32 CD E6 F3 CD D9 35 :20 

02 F3 El C9 CD 82 CC :BB 

2A 88 D0 22 02 F3 CD :D3 

AF 32 CD E6 32 45 D1 :21 

El C9 CD IE CD 2B D7 : 8B 

23 FE 20 D2 A0 4D 4F M7 

3E 22 12 13 ED B0 21 : EF 

83 CD 32 46 D1 12 13 :86 

ED 32 8A D0 22 8B D0 :B2 

D1 CD 66 CD 23 23 23 :7C 



VSUM 48 0E D5 98 6E CC ID 6E F6 E4 E0 C2 99 59 33 D2 :FB 



ADDR +0 +1 +2 +3 +4 
CD00 23 7E FE F8 El 
CD10 4D 3E C3 21 CF 
CD20 D1 B7 C8 E5 3A 
CD30 3A 46 D1 47 CD 
CD40 D1 El C9 E5 F5 
CD50 ED FI El C3 49 
CD60 IE CD FI D1 Cl 
CD70 D1 7E 23 66 6F 
CD80 41 EC C9 C5 D5 
CD90 CD 7E B7 28 05 
CDA0 F5 32 36 D1 21 
CDB0 D1 28 11 CD A3 
CDC0 B7 CA B3 03 32 
CDD0 0A C5 CD A3 18 
CDE0 18 Cl 4F C5 D5 
CDF0 28 1C 90 C5 E5 



VSUM FD 06 3E DF C7 



ADDR +0 +1 +2 +3 +4 
CE00 2B 96 23 96 23 
CE10 Cl C9 47 3E 0B 
CE20 D2 37 AF CD D2 
CE30 3E 04 28 02 3E 
CE40 CD C9 37 CD 47 
CE50 CD D2 37 69 26 
CE60 CD D2 37 CD 47 
CE70 D2 37 7E CD D2 
CE80 14 EF 20 2E 3E 
CE90 FE FF 28 0E 23 
CEA0 20 F8 3E IF CD 
CEB0 18 3F 69 26 00 
CEC0 7C 85 80 6F 26 
CED0 47 3E 18 CD C9 
CEE0 B2 18 04 2F E6 
CEF0 37 3E 04 32 14 



+5 +6 +7 +8 +9 +A 
28 17 E5 FE FC 30 
CF 32 42 ED 22 43 
8A D0 2A 8B D0 32 
66 CD 7E B7 78 C4 
3A 8D D0 2A 8E D0 
CA CD 49 CA C5 D5 
C9 26 00 6F 29 D5 
C9 32 27 D1 21 23 
E5 3A 7E EC B7 28 
10 F6 C3 B2 4D 78 
33 D1 D7 CD 04 4B 
18 3A 7D EC BB 7B 
43 D1 C9 01 00 00 
Cl 47 2B D7 28 08 
E5 21 62 EF 78 B7 
CD 12 CE El Cl 10 



73 IE C8 60 27 3B 



+5 +6 +7 +8 +9 +A 
BE IE 46 D2 B3 03 
CD C9 37 3E 07 CD 

37 3C CD D2 37 CD 
02 B9 DA 06 0B 7A 

38 B7 20 0A 3E 21 
00 11 3E D1 19 3E 
38 32 AC CE 3E IF 
37 3C 3A 14 EF 32 
20 CD C9 37 78 CD 
23 16 03 0E 02 BE 
C9 37 78 CD D2 37 
11 39 D1 19 E5 11 
00 19 D1 1A 77 3E 
37 CD 47 38 57 79 
0F A2 47 3E 17 CD 
EF C9 F3 C5 D5 E5 



+B +C +D +E +F :SUM 
05 FE FA D2 A0 :35 
ED El C9 3A 46 :EA 
42 ED 22 43 ED : 0 1 
9F CD AF 32 46 :9C 
32 C9 ED 22 CA : 48 
F5 CD 7D CC CD :E7 
ED 5B 7F EC 19 :96 
D1 CD D3 11 2A : 2A 
0B 47 78 CD 66 :F5 
El D1 Cl C9 E5 : 90 
FI El C9 3A 44 :5F 
IE 46 DA B3 03 :5F 
28 16 FE 2C 28 :D7 
CF 2C C5 CD A3 :C1 
20 11 46 7E B7 :F4 
F2 18 10 3D 2B :5F 



BC 01 45 A3 32 :D9 



+B +C +D +E +F : SUM 
CD 12 CE El D1 :A6 
D2 37 3E EE CD : FB 
47 38 D6 FE 57 : 1 7 
B7 20 74 3E 22 :75 
CD C9 37 3E 01 :65 
20 CD C9 37 78 :41 
CD C9 37 78 CD :3D 
F2 CE 3E 08 32 :40 
D2 37 CD 47 38 =16 
23 28 14 0C 15 : E0 
3E 01 CD D2 37 :A5 
64 EF 2A 60 EF :DC 
80 04 07 10 FD : 67 
FE 01 78 28 03 :28 
C9 37 78 CD D2 :14 
F5 2A 00 00 11 : 19 



VSUM 2B 7C F3 91 DB BD B6 CF 25 6B 03 1C 83 9A 8A E5 : 83 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :SUM 

CF00 F3 31 B7 ED 52 20 IE DB 09 0F D2 97 CF 07 07 30 : Cl 

CF1 0 IB 3A 4C D1 B7 20 25 3A 48 D1 07 38 28 AF CD 76 :1A 

CF20 46 78 B9 28 36 FI El D1 Cl C3 87 D0 3A 4C D1 B7 :61 

CF30 20 F3 3E 13 32 4C D1 CD F9 30 18 E9 CD F9 30 AF : 4F 

CF40 32 4C D1 18 E0 3A 45 D1 CD 66 CD 7E B7 28 48 3E :7A 

CF50 01 CD F8 45 28 CF CD B1 CF 18 F4 2A 49 D1 CB 7C :E6 

CF60 20 35 ED 5B 18 EB B7 ED 52 38 2C 2A 49 D1 3A C2 : 3A 

CF70 E6 47 F6 02 D3 31 4E 23 79 FE 1A 20 0E 7E B7 20 : AE 

CF80 0A 23 CB 7C 28 F7 78 D3 31 18 0C 78 D3 31 22 49 : 1 A 

C-F90 D 1 79 CD B1 CF 18 8E 3A 45 D1 F5 3A 47 D1 F5 AF :78 

CFA0 32 45 D1 CD 82 CC FI 32 47 D1 FI 32 45 D1 C3 25 :BF 

CFB0 CF 47 3A 4B D! 4F 78 32 4B D1 FE 0A C2 F9 30 79 :ED 

CFC0 FE 0D 78 C2 F9 30 3A 4D D1 B7 78 C2 F9 30 C9 C5 :6E 

CFD0 D5 E5 F5 3A 46 D1 CD 66 CD 7E B7 F5 CC IE CD FI :D2 

CFE0 28 13 2A 88 EC 7C B5 20 0C 3A 46 D1 CD 35 47 FI :C1 

CFF0 F5 DF CD 8B 0F FI El D1 Cl C3 8A D0 FE 01 CA 58 : DD 



VSUM 79 77 AD 07 E8 3A 18 5A E5 44 6E C0 06 93 8A 3D : EF 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :SUM 

D000 CA FE 02 CA 83 CD FE 03 CA E3 CD C3 06 0B E5 B7 :CF 

D010 ED 52 El C8 D5 E5 11 9C 01 B7 ED 52 IE 07 DA B3 :F8 

D020 03 El D1 D5 ED B0 El D1 E5 CD 2E D0 El E9 22 39 : AE 

D030 D0 23 23 5E 23 56 23 E5 21 00 00 B7 ED 52 22 6C :9A 

D040 D0 El 4E 23 46 2A 39 D0 09 22 84 D0 11 90 D0 1A :A5 

D050 13 47 1A 13 32 59 D0 E5 CF 00 El 23 10 F4 4E 23 :0F 

D060 46 23 78 B1 28 ID 5E 23 56 23 E5 21 00 00 EB 19 :DB 

D070 22 77 D0 22 7B D0 2A 00 00 19 22 00 00 El 0B 78 : 9F 

D080 B1 20 E3 11 00 00 C9 C3 00 00 00 00 00 00 00 00 :51 

D090 06 43 4F 53 4D 4F 53 90 D0 0D 0A 43 4F 53 4D 4F :D2 

D0A0 53 20 76 65 72 73 69 6F 6E 20 31 2E 30 20 5B 44 : E7 

D0B0 65 63 2E 31 39 38 37 5D 0D 0A 43 6F 70 79 72 69 :B9 

D0C0 67 68 74 20 28 43 29 20 62 79 20 53 4F 46 54 42 : 90 

D0D0 41 4E 4B 20 4F 68 21 38 38 0D 0A 0D 0A 00 05 44 :B9 

D0E0 52 49 56 45 AE CD 03 46 44 44 C8 CD 05 53 54 44 :07 

D0F0 49 4E A3 CB 06 53 54 44 4F 55 54 AB CC 03 56 45 : 03 
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VSUM 87 49 15 18 A6 ED 01 2E 77 IB 18 68 2C 3A 34 E8 : 53 



ADDR +0 +1 +2 +3 +4 +5 
D1 00 52 7B C9 00 DE D0 
D 1 1 0 82 85 41 53 23 0C 
D120 53 23 0C FF A5 28 
D130 0C 00 00 00 23 0C 
D140 01 11 29 01 01 00 
D150 00 00 00 00 00 00 
D160 00 00 00 00 00 00 
D170 00 00 00 00 00 00 
D180 00 00 00 00 00 00 
D190 88 D0 AA D0 49 D1 
D1A0 43 D1 45 D1 4D D1 
D1B0 BD 00 02 C9 23 C9 
D1C0 47 C9 53 C9 67 C9 
D1D0 AD C9 CC C9 CF C9 
D1E0 33 CA 36 CA 3B CA 
D1F0 76 CA 8B CA 93 CA 



+6 +7 +8 +9 +A +B +C +D +E 

07 2E 43 4F 4D 22 2C 0C 07 
0C 22 82 4F 55 54 50 55 54 
0C 00 00 29 00 23 0C 00 00 
00 00 00 03 02 03 09 0A FF 
00 00 FF 00 80 00 00 00 00 
00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 AA 

08 D1 97 D0 00 C9 8E D1 04 
FC CF 49 8F 43 4F 53 4D 4F 
26 C9 2A C9 2D C9 39 C9 3E 
6A C9 6D C9 7D C9 83 C9 A0 
DD C9 El C9 E5 C9 27 CA 2A 
4E CA 51 CA 5A CA 5F CA 66 
9C CA 9F CA A8 CA B1 CA B7 



+ F 
22 
41 
2C 
01 
00 
00 
00 
00 
D1 
D1 
53 
C9 
C9 
CA 



SUM 

DB 

AC 

DE 

56 

BC 

00 

00 

00 

7B 

29 

BF 

55 

C0 

86 



VSUM 59 FB 



E3 87 A1 7 A DF 0C 



F8 A3 65 79 7C 75 :56 



ADDR +0 +1 +2 +3 +4 +5 
D200 BA CA Cl CA C4 CA 
D21 0 09 CB 18 CB 29 CB 
D220 5F CB 8B CB A1 CB 
D230 D7 CB E0 CB E7 CB 
D240 2D CC 37 CC 3A CC 
D250 61 CC 65 CC 73 CC 
D260 97 CC 9E CC A1 CC 
D270 DC CC EB CC EE CC 
D280 25 CD 28 CD 31 CD 
D290 54 CD 57 CD 5D CD 
D2A0 A5 CD AF CD C5 CD 
D2B0 B6 CE 0B CF 12 CF 
D2C0 46 CF 49 CF 57 CF 
D2D0 9C CF A1 CF A4 CF 
D2E0 C7 CF D4 CF D7 CF 
D2F0 09 D0 2A D0 2F D0 



+6 +7 +8 +9 +A +B +C +D +E 
D6 CA D9 CA DC CA E0 CA EF 
43 CB 4A CB 4D CB 50 CB 59 
A4 CB BF CB C8 CB D1 CB D4 
EA CB F2 CB F8 CB 05 CC 08 
3E CC 43 CC 4A CC 4D CC 5E 
76 CC 7E CC 84 CC 8A CC 93 
A 7 CC AC CC C7 CC D0 CC D9 
FI CC F8 CC FB CC 1 4 CD IF 
35 CD 3B CD 3F CD 46 CD 49 
60 CD 77 CD 7 A CD 8F CD A2 
F6 CD 0C CE 57 CE 67 CE 7B 
18 CF 2A CF 2D CF 35 CF 41 
5C CF 6C CF 8F CF 93 CF 98 
A8 CF AC CF AF CF B3 CF B8 
DD CF EA CF FA CF FF CF 04 
3F D0 46 D0 4A D0 4D D0 55 



+ F 
CA 
CB 
CB 
CC 
CC 
CC 
CC 
CD 
CD 
CD 
CE 
CF 
CF 
CF 
D0 
D0 



:SUM 
:E9 
: 25 
:B3 
:D9 
:74 
:2E 
:F9 
: 2E 
:24 
:F2 
:C0 
:2F 
:E0 
:C7 
: AF 
:53 



VSUM 



CD 8A CE 17 CE B6 CE 



CF 38 CF C4 D1 5D D2 111 



ADDR 
D300 
D31 0 
D320 
D330 
D340 
D350 
D360 
D370 
D380 
D390 
D3A0 
D3B0 
D3C0 
D3D0 
D3E0 
D3F0 



+0 +1 +2 +3 +4 +5 
71 D0 74 D0 97 D0 
04 D1 8E D1 90 D1 
9C D1 9E D1 A0 D1 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 



+ 6 
E4 
92 
A2 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ 7 
D0 
D1 
D1 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ 8 
EA 
94 
A4 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+9 +A +B +C +D 
D0 F2 D0 FB D0 
D1 96 D1 98 D1 
D1 A6 D1 FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 
FF FF FF FF FF 



+ E +F 
01 D1 
9A D1 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 
FF FF 



SUM 



A8 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 



VSUM 04 65 93 65 BA 65 0B 65 15 65 21 65 85 93 8D 94 : 29 
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MKCOM.COM 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 
C000 18 12 00 C0 7C 03 4D 4B 
C010 31 2E 30 00 ED 73 20 C2 
C020 C9 56 06 00 4E 23 7E 23 
C030 11 3C C3 ED B0 ED 53 31 
C040 C3 21 0E C3 01 0A 00 ED 
C050 AF 32 28 C3 CD 3A C2 5F 
C060 CD 3A C2 67 B7 ED 52 22 
C070 21 22 C3 D7 CD 04 4B 2A 
C080 91 C2 ED 5B 31 C3 2A 18 
C090 23 06 00 ED B0 21 3A C3 
C0A0 D5 13 13 CD 26 C2 6F 13 
C0B0 CD 26 C2 6F 13 CD 26 C2 
C0C0 C2 E5 2A 16 EB 11 EE FF 
C0D0 6F 46 23 EB El 1A 13 CD 
C0E0 02 CD 77 C2 32 15 C3 ED 
C0F0 06 00 ED B0 21 3A C3 D7 



VSUM 12 7 A 27 68 F2 A8 ID 39 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 
C100 06 CD 3A C2 10 FB 21 01 
Cl 10 2A 2B C3 B7 ED 52 22 37 
Cl 20 E5 2A 37 C3 19 44 4D El 
Cl 30 E5 13 13 D5 CD 3A C2 6F 
Cl 40 B7 ED 52 CA EB Cl 22 39 
Cl 50 3A C2 47 B9 28 32 D5 E5 
Cl 60 8F C2 7 A CD 8F C2 D1 13 
Cl 70 C2 67 D5 B7 ED 42 ED 4B 
Cl 80 35 C3 23 22 35 C3 D1 El 
Cl 90 El 38 58 20 B6 22 2F C3 
C1A0 CD 8F C2 7 A CD 8F C2 3A 
C1B0 D7 CD 04 4B 2A 18 EB 22 
C1C0 52 22 20 C3 2A 16 EB 11 
C1D0 5B 31 C3 13 01 03 00 ED 
C1E0 ED B0 21 3A C3 D7 CD C2 
C1F0 FF 19 7E 23 66 6F 7E 23 



+8 +9 +A +B +C +D +E +F :SUM 

43 4F 4D 2E 43 4F 4D 20 :0D 

CD D3 11 22 23 C2 E5 CD :3B 

66 6F 3E 20 B9 DA A0 4D :EA 

C3 3E 02 CD 77 C2 32 15 :6E 

B0 21 3A C3 D7 CD 98 47 :FE 

CD 3A C2 57 CD 3A C2 6F :4C 

29 C3 3A 15 C3 32 25 C3 : 60 

29 C3 ED 5B 18 EB 19 CD : 40 

EB 22 06 C3 21 02 C3 4E :DB 

D7 CD BF EE ED 5B 18 EB : 80 

CD 26 C2 67 13 22 2B C3 :71 

67 D1 19 22 2D C3 CD 91 : AD 

19 7E 23 66 6F 7E 23 66 :66 

8F C2 10 F9 22 33 C3 3E : 4E 

5B 31 C3 21 09 C3 4E 23 :AC 

CD 98 47 AF 32 28 C3 06 :16 



CE 9F 9E 30 2F AF 66 EF : 79 



+8 +9 +A +B +C +D +E +F :SUM 

00 22 35 C3 ED 5B 18 EB :61 

C3 2A 33 C3 23 23 13 13 :B6 

79 CD 8F C2 78 CD 8F C2 :C1 

CD 3A C2 67 ED 5B 2B C3 :7E 

C3 D1 El CD 26 C2 4F CD :0D 

2A 37 C3 19 EB El 7B CD :61 

E5 68 CD 26 C2 47 CD 3A :1D 

39 C3 B7 ED 42 20 6C 2A :B4 

13 E5 2A 2D C3 B7 ED 52 : EF 

2A 33 C3 ED 5B 35 C3 7B :36 

15 C3 32 25 C3 21 22 C3 :E8 

1C C3 EB 2A 2F C3 B7 ED :CC 

EC FF 19 7E 23 66 6F ED : FA 

B0 21 18 C3 4E 23 06 00 :76 

EE El C9 2A 16 EB 11 E6 :DB 

66 6F 11 08 E8 B7 ED 52 : FB 



VSUM 8F 80 F2 52 A8 AD EA E7 72 94 F6 84 09 AB E4 23 :B4 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :SUM 

C200 21 BF C2 28 0A 3A 70 85 FE 03 38 03 21 D3 C2 CD :C2 

C210 50 55 3A 15 C3 32 25 C3 21 22 C3 D7 CD 04 4B 31 : FB 

C220 00 00 21 00 00 C9 F3 3A C2 E6 32 34 C2 F6 02 D3 : B2 

C230 31 1A F5 3E 00 D3 31 FI FB C9 C5 D5 E5 3A 28 C3 : DB 

C240 B7 20 0D 3A 15 C3 32 25 C3 21 22 C3 D7 CD 98 71 :C3 

C250 CD 67 C2 11 09 00 19 3A 28 C3 5F 16 00 19 3C 32 : 4A 

C260 28 C3 7E El D1 Cl C9 2A 7F EC 3A 15 C3 87 5F 16 : 48 

C270 00 19 7E 23 66 6F C9 F5 22 8A C2 2A 16 EB 2B 2B : 3C 

C280 2B 7E 2B 6E 67 FI 22 8D C2 21 00 00 C3 00 00 77 :66 

C290 23 F5 D5 E5 2A 16 EB 11 EA FF 19 7E 23 66 6F 5E :E4 

C2A0 23 56 El E5 B7 ED 52 30 04 El D1 FI C9 3A 15 C3 :E7 

C2B0 32 25 C3 21 22 C3 D7 CD 04 4B IE 07 C3 B3 03 0D : BE 

C2C0 0A 42 61 64 20 66 69 6C 65 20 66 6F 72 6D 61 74 :7A 

C2D0 0D 0A 00 0D 0A 83 74 83 40 83 43 83 8B 82 CC 83 :8D 

C2E0 74 83 48 81 7C 83 7D 83 62 83 67 82 AA 90 B3 82 :FC 

C2F0 B5 82 AD 82 A0 82 E8 82 DC 82 B9 82 FI 81 42 0D :4C 



VSUM 31 D0 D7 97 D2 A0 0E 80 FF 22 40 67 4F B2 3E A3 : 1 9 



ADDR +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :SUM 

C300 0A 00 06 22 2C 0C 00 00 00 0E 2E 4F 46 53 22 82 : 32 

C31 0 85 41 53 23 0C 00 00 00 0A 22 2C 0C 00 00 2C 0C :E4 

C320 00 00 00 23 0C 00 00 00 00 00 00 00 00 00 00 00 :2F 

C330 00 00 00 00 00 00 00 00 00 00 00 22 00 00 00 00 : 22 

C340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 • 00 

C350 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 : 00 

C360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ! 00 

C370 00 00 00 00 00 00 00 00 00 00 00 00 43 4F 53 4D : 32 

C380 4F 53 60 00 02 C0 16 C0 1C C0 31 C0 37 C0 3C C0 : 5A 

C390 3F C0 42 C0 4A C0 52 C0 55 C0 59 C0 5D C0 61 C0 :89 

C3A0 68 C0 6B C0 6E C0 71 C0 78 C0 80 C0 84 C0 8A C0 :B8 

C3B0 8D C0 96 C0 A4 C0 A9 C0 AE C0 B1 C0 B6 C0 BC C0 :41 

C3C0 BF C0 D8 C0 DD C0 E2 C0 E5 C0 E9 C0 EC C0 F5 C0 :05 

C3D0 FD C0 02 Cl 0A Cl 11 Cl 17 Cl 1A Cl 22 Cl 2A Cl :9E 

C3E0 2E Cl 35 Cl 39 Cl 3E Cl 44 Cl 47 Cl 4C Cl 50 Cl : 09 

C3F0 59 Cl 60 Cl 64 Cl 6B Cl 6F Cl 78 Cl 80 Cl 84 Cl :7B 



92 



VSUM 55 D6 6B AB 26 0F IE 03 50 33 D7 80 31 A5 77 DE : 9C 



ADDR +0 +1 +2 +3 +4 
C400 8B Cl 96 Cl 99 
C41 0 AE Cl B8 Cl BC 
C420 0D C2 13 C2 16 
C430 4A C2 51 C2 58 
C440 B1 C2 B4 C2 FF 
C450 FF FF FF FF FF 
C460 FF FF FF FF FF 
C470 FF FF FF FF FF 
C480 FF FF FF FF FF 
C490 FF FF FF FF FF 
C4A0 FF FF FF FF FF 
C4B0 FF FF FF FF FF 
C4C0 FF FF FF FF FF 
C4D0 FF FF FF FF FF 
C4E0 FF FF FF FF FF 
C4F0 FF FF FF FF FF 



VSUM 36 BD 5B BD B7 



+5 +6 +7 +8 +9 +A 
Cl 9D Cl A1 Cl A5 
Cl C2 Cl D1 Cl DA 
C2 19 C2 2B C2 3E 
C2 60 C2 6B C2 79 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 
FF FF FF FF FF FF 



FA CC FA FC FA 2A 



+B +C +D +E +F :SUM 
Cl A8 Cl AB Cl : F8 
Cl E3 Cl 01 C2 :7C 
C2 44 C2 47 C2 :53 
C2 87 C2 AE C2 :7C 
FF FF FF FF FF :DD 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 
FF FF FF FF FF :F0 



FA 4A FA 95 FB :70 



3 FCOPY.COM 



ADDR +0 +1 
C000 18 12 
C010 31 2E 
C020 C2 C3 
C030 74 C3 
C040 80 C3 
C050 01 C2 
C060 7E C3 
C070 7E 32 
C080 CD 41 
C090 00 3A 
C0A0 20 C4 
C0B0 5B IF 
C0C0 C3 CD 
C0D0 C4 4F 
C0E0 28 16 
C0F0 EB CD 



+2 +3 +4 +5 
00 C0 45 04 
30 00 CD F2 
CD D3 11 E5 
CD 23 C2 El 
CD 0C C2 D5 
32 BD C3 32 
D7 CD 98 47 
1C C4 23 23 
C2 23 7E 32 
1C C4 07 38 
3A 1C C4 07 
EB B7 ED 52 
2E C2 22 26 
06 00 B7 ED 
41 ED 5B IF 
7C C2 10 FB 



+6 +7 +8 +9 
46 43 4F 50 
Cl 3E 02 CD 
CD C9 56 11 
CF 2C CD D3 
21 42 C3 D7 
C7 C3 D1 21 
3A C2 C3 CD 
23 7E E6 FD 
IF C4 23 23 
07 3A ID C4 
DA 80 Cl CD 
7C B7 CA 52 
C4 2A 26 C4 
42 22 26 C4 
EB CD 5A C2 
18 CF CD A1 



+A +B +'C +D 
59 2E 43 4F 
01 C2 32 7C 
44 C3 CD 0C 
11 E5 CD C9 
CD 98 47 3E 
B0 C3 CD 23 
41 C2 23 23 
32 IE C4 3A 
23 7E 32 ID 
07 38 01 05 
9A 55 2A FI 
C2 32 21 C4 
CB 7C 20 2A 
30 06 09 4D 
10 FB 41 ED 
C2 3A 20 C4 



+E +F :SUM 
4D 20 :E1 
C3 32 : 82 
C2 21 : DB 
56 11 : 58 
02 CD : 69 
C2 21 : 69 
23 23 : DF 
C7 C3 : 32 
C4 06 :86 

78 32 :6A 
EA ED :CE 
3A C2 : 7F 
3A 21 : 8C 

79 B7 :C7 
5B IF : 6D 
B7 El :CE 



VSUM DE 9D B0 



ADDR +0+1 +2 
Cl 00 C8 E5 3A 
Cl 10 C4 57 3E 
Cl 20 20 05 7B 
Cl 30 20 05 7B 
Cl 40 CD B8 C2 
Cl 50 41 C2 11 
Cl 60 21 0A 00 
Cl 70 E7 18 CA 
Cl 80 3A C2 C3 
C190 CD A1 C2 
C1A0 35 47 11 
C1B0 5F 38 13 
C1C0 28 C4 21 
C1D0 32 CA E6 
C1E0 7E 23 66 
C1F0 8B 0F E5 



3B 9F ID 6D D8 



+3 +4 +5 +6 +7 
ID C4 3C 32 ID 
02 CD B8 C2 32 
3D 20 01 04 78 
B7 20 01 05 78 
B9 20 05 IE 35 
09 00 19 06 10 
19 3A IF C4 BE 
11 09 00 19 3A 
CD 95 Cl 38 08 
El C9 4F C5 3A 
00 00 CD D7 4C 
21 B9 E9 06 FF 
28 C4 C9 CD CE 
37 C9 E5 CD 35 
6F 7E 23 DF 10 
2A 16 EB 2B 11 



EF B4 F2 C7 12 



+8 +9 +A +B +C 
C4 3E 05 CD B8 
24 C4 5F 06 00 
32 22 C4 06 00 
32 25 C4 0E 00 
C3 B3 03 CD D1 
7E B7 28 0F 3C 
EB 28 08 11 10 
IE C4 77 CD 0B 
3A C7 C3 CD D5 
1C C4 3C Cl 79 
CD 8B 0F C3 C9 
7E 23 04 B7 20 
35 28 FB FE 0D 
47 El 46 23 78 
FB 3E 0D DF 3E 
44 C4 01 1A 00 



5D FB 17 : 44 



+D +E +F :SIJM 
C2 32 23 :F6 
7 A FE 12 : AB 
7 A FE 12 : 22 
0C 3E 0A : 72 
C2 AF CD :CD 
28 E7 EB :EE 
00 19 10 : 84 
C3 El C9 : D4 
Cl 18 F0 :51 
28 0F CD : 82 
56 CD C8 : 5B 
FA 78 32 : 92 
20 F7 AF : 86 
B7 28 09 :BA 
0A DF C3 : 15 
ED B8 El : 8F 



VSUM E0 84 06 C6 6C B5 7C 2D F2 E3 F7 C3 DA 76 IE F5 :EC 



< 4 - 



ADDR +0 +1 + 2 +3 + 4 
C200 C9 E5 2A 41 C4 
C21 0 00 4E 23 7E 23 
C220 El Cl C9 C5 E5 
C230 F5 32 18 C4 21 
C240 C9 D5 F5 2A 7F 
C250 D1 C9 CD A1 C2 
C260 5A 21 BF C3 D7 
C270 00 19 D1 01 00 
C280 CD 86 5A 3A C7 
C290 00 01 ED B0 E5 
C2A0 C9 C5 D5 E5 F5 
C2B0 CD 04 4B FI El 
C2C0 C4 32 0C C4 21 
C2D0 C9 C5 D5 E5 F5 
C2E0 C4 32 D1 C3 3A 
C2F0 C3 32 E8 C3 3A 



VSUM 0A A9 81 C6 11 



ADDR +0 +1 +2 +3 +4 
C300 CD D3 11 CD C9 
C310 ID C4 32 ED C3 
C320 C4 32 F5 C3 32 
C330 C4 B7 21 EB C3 
C340 D1 Cl C9 22 00 
C350 00 00 00 00 00 
C360 00 00 00 00 00 
C370 00 00 00 00 0A 
C380 00 00 00 00 00 
C390 00 00 00 00 00 
C3A0 00 00 00 00 00 
C3B0 0F 22 82 4F 55 
C3C0 23 0C 00 00 00 
C3D0 0C 00 00 2C 0C 
C3E0 00 00 2C 0C 00 
C3F0 0C 00 00 2C 0C 



+5 +6 +7 +8 +9 +A 

22 0A C2 El C3 00 
66 6F 3E 20 B9 DA 
4E 23 06 00 ED B0 
14 C4 CD D3 11 2A 
EC 87 5F 16 00 19 
IE 07 C3 B3 03 C5 
CD 98 71 3A C2 C3 
01 ED B0 FI El Cl 
C3 CD 41 C2 11 09 
21 C4 C3 D7 CD A6 
21 BF C3 D7 CD 04 
D1 Cl C9 C5 D5 E5 
08 C4 CD D3 11 3A 
3A ID C4 32 CD C3 

23 C4 32 D5 C3 32 
25 C4 B7 21 CA C3 



22 ED 20 F8 0B A0 



+5 +6 +7 +8 +9 +A 
56 FI El D1 Cl C9 
32 FD C3 3A 22 C4 
01 C4 79 32 F9 C3 
28 03 21 FB C3 D7 
00 00 00 00 00 00 
00 00 00 00 00 00 
00 00 00 00 00 00 

22 82 85 41 53 23 
00 00 00 00 00 00 
00 00 00 00 00 00 
00 00 00 00 00 00 
54 50 55 54 41 53 

23 0C 00 00 00 EC 
00 00 2C 0C 00 00 
00 2C 0C 00 00 29 
00 00 2C 0C 00 00 



+B +C +D +E +F :SUM 
00 C5 E5 F5 06 : 1 4 
A0 4D ED B0 FI :53 
El Cl C9 C5 D5 : 2E 
41 EC FI D1 Cl : 87 
7E 23 66 6F FI :A4 
E5 F5 D5 CD 86 :2F 
CD 41 C2 11 09 : 53 
C9 C5 E5 F5 D5 :59 
00 19 D1 EB 01 : 31 
71 D1 FI El Cl : 4A 
4B 21 C4 C3 D7 : 52 
32 10 C4 3A ID :25 
41 EC El D1 Cl :3E 
32 E0 C3 3A 22 : 4B 
E4 C3 79 32 D9 :D2 
28 03 21 DD C3 :14 



28 8A F6 60 17 :FC 



+B +C +D +E +F :SUM 
C5 D5 E5 F5 3A :78 
32 FI C3 3A 23 : 1 8 
32 05 C4 3A 25 :66 
CD 98 EE FI El :50 
00 00 00 00 00 : 7D 
00 00 00 00 00 : 00 
00 00 00 00 00 : 00 
0C 00 00 00 22 : 18 
00 00 00 00 00 : 00 
00 00 00 00 00 : 00 
00 00 00 00 00 : 00 
23 0C 00 00 00 : 67 

28 0C 00 00 2C :AA 

29 00 EC 28 0C :C5 
00 0C 00 00 2C : D1 
00 0C 00 00 2C : B4 



VSUM 



6F D0 3D F8 4A BF 7C E5 33 B2 76 93 46 82 15 



: 36 



ADDR +0+1 +2 +3 
C400 0C 00 00 2C 
C410 00 00 29 00 
C420 00 00 00 00 
C430 00 00 00 00 
C440 00 00 00 00 
C450 C0 1A C0 ID 
C460 C0 43 C0 47 
C470 C0 67 C0 6A 
C480 C0 92 C0 98 
C490 C0 C2 C0 C5 
C4A0 C0 FC C0 03 
C4B0 Cl 39 Cl 41 
C4C0 Cl 84 Cl 89 
C4D0 Cl 03 C2 06 
C4E0 C2 84 C2 87 
C4F0 C2 C5 C2 D6 



+4 +5 +6 +7 +8 +9 +A 
0C 00 00 00 FF D0 28 
FF A5 28 0C 00 00 29 
00 00 00 00 00 B9 E9 
00 00 00 00 00 00 00 
00 43 4F 53 4D 4F 53 
C0 20 C0 2A C0 2D C0 
C0 50 C0 53 C0 56 C0 
C0 72 C0 7B C0 7E C0 
C0 A0 C0 A3 C0 A 7 C0 
C0 C8 C0 CF C0 D8 C0 
Cl 07 Cl 0C Cl 0F Cl 
Cl 4C Cl 50 Cl 65 Cl 
Cl 8C Cl 91 Cl 98 Cl 
C2 32 C2 35 C2 53 C2 
C2 96 C2 A6 C2 AD C2 
C2 D9 C2 DC C2 DF C2 



+ B +C 
0C 00 
00 00 
00 00 
00 00 
6D 00 
30 C0 
5A C0 
81 C0 
B9 C0 
E8 C0 
15 Cl 
78 Cl 
C0 Cl 
62 C2 
BC C2 
E2 C2 



+D +E 
00 2C 
00 00 
00 00 
00 00 
02 C0 
33 C0 
5D C0 
86 C0 
BC C0 
F2 C0 
18 Cl 
7C Cl 
C3 Cl 
69 C2 
BF C2 
E5 C2 



+ F 
0C 
00 
00 
00 
15 
40 
60 
8D 
BF 
F9 
29 
81 
F8 
6C 
C2 
E8 



SUM 

7F 

2A 

A2 

00 

18 

51 

9A 

D0 

48 

C9 

7D 

F8 

45 

09 

41 

EE 



VSUM 53 



ID 71 87 54 B2 C0 6D 95 43 D6 72 49 2A 35 BE :21 



ADDR +0 +1 +2 +3 +4 
C500 C2 EB C2 EF C2 
C51 0 C3 16 C3 19 C3 
C520 C3 2F C3 33 C3 
C530 FF FF FF FF FF 
C540 FF FF FF FF FF 
C550 FF FF FF FF FF 
C560 FF FF FF FF FF 
C570 FF FF FF FF FF 
C580 FF FF FF FF FF 
C590 FF FF FF FF FF 
C5A0 FF FF FF FF FF 
C5B0 FF FF FF FF FF 
C5C0 FF FF FF FF FF 
C5D0 FF FF FF FF FF 
C5E0 FF FF FF FF FF 
C5F0 FF FF FF FF FF 



+ 5 
F2 
1C 
38 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ 6 
C2 
C3 
C3 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ 7 
F5 
IF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ 8 

C2 

C3 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 



+ 9 
F9 
22 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ A 
C2 
C3 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ B 
FE 
25 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+C 

C2 

C3 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 

FF 



+ D 
10 
29 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ E 
C3 
C3 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



+ F 
13 
2C 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 



SUM 

EC 

IE 

9D 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 

F0 
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VSUM 3B 23 3B 2E 3B 39 3B 06 77 0D 77 15 77 2B 78 31 :D7 



PC-8800->'J— 

NICE ACCESS 



’ £ i i \ < e> ab' ^ r €C \ u £ ©„ ' 

’ ! . L 5 ^ ?’ >m© !^® hZ ZZZ ' 



□-KIZSIZO^px-YJiyD^y^— 57-c^-o BASIC "C 

» jtfnr ai<oV ’ 2005 ^ ^^^'©'short ' 

' ' fo ' ^'^si&toracsi:5V 'ziu'®&id #js'C v £©&;££> ' 



s-h-au. !? 




^ 7D^5ZiOD**gt 



) 



88-r^y 3 y ilfgfcifc L A-CV & tj fc £ 
I’tgi'iti', 401*7 s^n-K**- 
?vn-K c^jto 77^3 ys*-** 
0ot*i U: 0 



®^vn-Ko«u:ie«k#<xfci5cff3- 



K^*»3- K*»it 4 (y -*- 1) 
©7 * 7”n - K-r 4 X*© 1 ftOX^&fc 
fy.i4 (^-^-2) 
©**+©**;& tX*;fr****/4ft 



Xfi:Hi4 (y-^-3) 

(il&gSM-KOicP ) 

® PC-8800 * V - 7.'©'* V 3 > 

©7 n •> \£- V V A 7' (*® 1 fr&B) 

@f^7v>f «sfiMfc*ir*r> 

( VUO=5U(D-KhtL \ 

V »f y 

®:0/n/7ili Vl/V2/V30l'1* n 

© basic *- K-r i, £ftr sit 



© ”How many files ? ”' N - © I£Se 1£, ” 2 ” 

@frA*L*C<*53i' 
®nH07n77A^^Lit„ ft 
*r RETURN *-*fft0*Slx?C 
I'J: 5«: 

save ’’FLCONV” © 

-T, 7n/7A^-t-/LJt 
©RUN © 

r^ft-rto *s?ix4^ 

*-«:flfes»36</'Sl' 

( &*j5 

© ”CR”tt8cft 3 - K, ”LF"tt«»3 - K 

rt 

©y 2 r 1 ft©x^ a«r«s tit 

* f , c l x < //» 

®7 7f^f*10l?l^7 h JIS«^a- 
K-rao -ci' it o ^9yfl-Kt4* 
i:ii«y7 l'-C' l >7 h JIS»*a-Kj 
r««t4 i 5i:i8£L-C<//3i' 

©7 r -f ^©«HMs«r”SCRN : ,,J P”LPT 

: "«:»3fet4 i.ri xrwcas^L 

fcs. 7°y >ycm*t4 i taftrs i 
t 




PC-8801 R/H/A 



BACH t* >7'Vv—'s? > 



BGM ^3lift£C'0£U=&-5d:l\-5©tf, *i£M 
*t© r^-o ivj’D'yttuv^u&f 

ssm©^ 

BSt^>r»<ei-J-rC7^'i/£/'V^«ll'C€»/TVD><b 



U^©^, 88ZL-- 

&l\'CUc£'5#\, C©:?CK7^Z_>l3:M'yM© r »ffi 
£6«ffi* 3 Sj ©±«£ BASIC -C mhjt**><D 
r, #0<i;^|Ql2®IZ^-CJS«U^^o 




-]'«*- 0. 



(J a5«g*7P^2»s« 

*4$AI i ti>5»IHrcr 

^c-rt* 1 ? t >ty Tt'&mvmi&t 
Lt#fttS * 5 C, BGM^HJttLT 
*L fc 5 ti'50iim U'oti, 
WificDw^tf6r* ! it5o*'ts6ns tig 
firiSOt'ti'o ^i£-riik'T"t£D#& 
r, tf*fcttfl«r-8c*Ltr r Jlitt'r" 
*j 44J.O (jaa^am^iLAiA tB* 
fcyofciO. i*. 

fcOtHiltf, IHiti’A&i*A.) fc Wt 
SfiTi'it. 

'**=*> 

* y o y 7 /. *■ fi a/ „* o r- a -r i&mft- 

I*. W.f(5*tLTSi’tif<0iiot 
t« «t V t> O. t < C PC-8800 S' ') - x '0 
SR Jmtotta c ft fm jm: 

i'it0t, ctt*ffifc4i'ti*Jb •> it 
A. 3>®l*, tyvi/y?, 
«rawi**rn^9 a«: LT*i Li?„ 

Z ©T’n 7" 7 A 

*BWi:. '<7''0 rff&iRttllbft 3 *j 
4**irl|«f*7 , D/5 ACL fc L 0t* 
t* J , lift*** i •> i:gi'ft«!i!: 1007“ 
nmi:t4: ti*-r& i-a-ArLfc. 

* i -raw'- * 5? c t c s - 1 1 x r 

4 Si*l#C**43lWM.'«t 

*BU*#*0£r-*MBfrL, IkBi: 



T0UiBflX* J ^$nS7 o Di!''7 A t, ta 
WX<Dr-*7 p u?'yA&l[SfrL£to t 
V*^TfcfcHit'^-*«r%&trf.r» t 
i»#ffl0fSS¥4r 
b^aM^uI L/wo 

( !fc*£A-K7x7 

® PC-8800 S'J>-X , *C'V2 j e-K0BASIC 

ya-y fcf— F 7 yf r?'***® 
1 61***. 

©7*--?? h LA't'-f 

1 Stt/n ^7 Affi^ffl, fc 5 1 tttt 
4>5l«C*'7 

xtAlifi' i t. 
©t'StUf7>7 D t xC-£ 

tli* *> itA* J , 7V7°tx tf-* 
Ltttst, i DJ?*©****'* 
Ltj-z t**-rt> *-r. 

(• UXSCDttS&aWui: 
•SRT^CDftfiK 

(D BASIC t-Kfll ilUI 7 t £ 
r V2jC ltmW*Atii-to V2*-K 

0 4 <•’ pc- 8800 •> y - x'-r i* i? tf -c ^ 
it a. 

® ”How many files ? ”~-0l&aLli, 

6 © 

«rA*Li:<*?Si\, 

®7* — JJ-HC A0AoL’7 



2 ftffljSL it. 

®f*f'-MW7*B/7A (!> x h 1 

~i2) ZAfiiito yxhc'toft* 
t'@?rfft0tsn4i'i 5 Co 
®lo®y x hfrArtffc, 7°n7*7Af£# 

I07B 7fc?-fr K 7 t 7' 1 CfflAL, 
SAVE” <7 7 4*'*)’ © 
fcAtlLito 77f^li&2'B77 

A03Oftt:*S«Bii?r^C-C<^$l.'o 
©7°B7'7A4fT^ X^C-fe-7'Lfc&, 
^UI*f-i!ft#ffl07B 7 tf-fr 
Kx-f 7'1 c#Al, 

RUN © 

4r A* Lit. ’’OK”* 1 ^? ftl* S>, flr 
jfcj'-jfftftfcTfto 

<y x I i 

~12) 3rA tltSfctfC, ©~©07IH 
*«*>iSLito 7”n7'xAf*#ffl07 
n x C- t ^r"-3f»#ffl0 7 b 7 fc° 
-4'fJSitx4i.'J: 5CLT< A'Ji-. 

(J 31*75, * 

®i^#ffl07°n^7A ( y X 1 13—14) *■ 
A* Li to 

©T-n^AfcAtjLA't,, 

07 b 7 f— c-t— 7'L"C < tfSi'o 

®»i^*4-iW#tacii, yxM307° 

B/7Ai tnia^0**«r«#t6 

ci*y x H40tB77A^it'it. 

®#*^- ^fSl¥ffl0 7 o 7 C- 4- K 7 t 

7*1 cifAL it. 



97 



©* 1 li, 

LOAD ’’list p 1 ” © 

1 CD7n->tf-^# 

XLtzC>, 

RUN © 

-amvmi ut. 

©* 1 
ffl 

LOAD ’’list p 2 ” © 
fy'ufyi** n — KLit„ K:M7' 

ALA*?,, 

RUN © 

%-A*Lit 0 Huge, 

Select Music Number ( 1 - 6 ) 

1 -DATA. M • 2 

2 - DATA. M • 3 

3 - DATA. M-4 

4 -DATA. M • 5 

5 -DATA. End 

6 "-DATA. Ope 

t*^5W:c„ mm-nsacD^^m 

#ai-fo 

r DATA. M • 2j li*2£*, r DATA . 
M • 3j li*3*it, r DATA. M • 4j li 
* 4 *$, r DATA. M • 5j li* 5 
r DATA. Endj I 

HDATA.Opej li* -7-y „ 



(j DXSO5W40 

&!)xi ©rt^iio r© t *>- 1 -rt„ 

®mi : MUSIC 1.M8 

A) 

* 1 «#* 1 '<A * ') b o Wifc 

r-9"DATA A. M-l”Hfr£o 
®y X b 2 (7°a : MUSIC 1.M8 

B) 

*im<c*2'M*y >©^'°-ho ^ 
x'— ^”DATA B. M • l”Hfr£o 
®ni3 (/b/7A« : MUSIC 1.M8 

C) 

*i*<Et'*7©'-?-K %mr-9 
’’DATA C. M • l”HWo 
®y X b 4 (7°o^7A« : MUSIC 1.M8 

D) 

*1 £*',-:^3-K©'' 0 -K 
:T-*”DATA D. M • l”5r(W„ 

®y X b 5 (X°n ^7 A« : MUSIC 1.M8 

E) 

*”DATA E. M • rteiffco 
®y X b 6(^/5^ : MUSIC 1.M8 

F) 

*l&**7W2©'<-bo W&t'- 
9 ’’DATA F. M • l”£m£ 0 
®y X b 7 (/n/y Ag : MUSIC 2.M 



88) 

* 2 b o ^^t'-^”DATA 

. M • 

®y X b 8 (/d/ 7A« : MUSIC 3.M 
88) 

* 3 b . ^«r*-*”DAT 

A . M • 3"*fMt. 

©y X b 9(7°a^7A« : MUSIC 4.M 
88) 

* 4 **£✓«- b . #&x'-*”DAT 
A . M • 4”4-#l*o 

©y x H0 (/o/ 7A« : MUSIC 5.M 
88) 

* 5 b o Hr*r'— *” DAT 

A . M-5”*ftM£o 

©y X blK^n;/? a€ : MUSIC 6.E 
nd) 

(7*7^r'V7>^tia# 
ffi*6#*2*#)o #«t'-*”DAT 
A . End”Hfr£ 0 

@y x H 2 (/n/ 7 A« : MUSIC 7.0 

pe) 

2 #* 6 

«S6$)„ #^r'-^”DATA . Ope”ft 

l£o 

@y X M3 (/n^A? : list pi) 
Sll*tsmffl^n/?A 0 
©y X M4 (X°n ^7 Ag : list p 2) 

* 1 A„ 



u 

h 

1 



10 • C OVERTURE 3 Part of 1st Violin 

20 - Programed by D.Kobayashi In June, 1985 

30 'save "MUSIC1 .M8A" 

40 DATA "T70O4V10Q892L16” 

50 DATA ''04L16D4&DF#ED'' , “B48B>DC#<B" 

60 DATA "05L16G4&GEF#G“ , "C#4&C#<AB>C#" 

70 DATA "04L16E4.E8" , " >E8.C#<A8 .G“ 

80 DATA "04L1 6F#8. DF#8. A" , “ >D8.<A>D8.E" 

90 DATA "05L16F#4&F#GAF#" ,"B4&BG#AB" 

100 DATA "05L16E48.EEF#G#“ , " A8 . EC#8. <A" 

110 DATA "05L32D4 .D8“ , "D8. EF0E8.D16" 

120 DATA “05L16C#8.< A>C#8. E“ , "A8.G32F#32G8. E" 
130 DATA "05L32B4.D#8","E8.F#16F#8.EF#" 

140 DATA “05L1 6G4&GF#ED" , “C8. CD8 . E" 

150 DATA “04L1 6A#4 . >G8” , "F#8.ED8.C#" 

160 DATA "05L16D8.C#<B8. >C#“ . "C#4. <B8" 

170 DATA “04LI 6B4&BBAG#" , "A8. >F#<A8.G#" 

180 DATA "04L16G#8.EG#8.A",">E4.E8" 

190 DATA “ 05L 1 6E4 &E< AB >C# " , " dc#def #ef #g# " 

200 DATA "05L16AG#8.F#E8.",”B4.D8" 

210 DATA “ 05L8C84 . < B " , " B4 . A ” 

220 DATA "04L1 6A4&A>C#<BA'' , " >G8 . EF#8 . G" 

230 DATA "05L32A4.CB" , ”C8.<B>CD8.<A16” 

240 DATA "04L16B4&BAGF#" , "EF#GAB>C#D<B" 

250 DATA “05L16C*DC#<BAB>C#D" , "EF#GAGF#GE" 

260 DATA “05L1 6F#8 . GA8 . B" , "C#8 . DD8 . C#32D32" 
270 DATA "05L32E8.<A16>G8.<F#EF#>16'\''F#4.E8“ 
280 DATA "05E1 “ 

290 DATA "T100O5L1 6E8<AB>C#8C#D" , "E8C#DE8EF#" 
300 DATA "05L1 6G8GF#G8AG“ , "L8F#ADF#8." 

310 DATA “F#ACF#&" , "F#ADF#" 

320 DATA "05L8GBDG#&" , "G#BEG#” 

330 DATA ''05L16AEC#DEF#EF#","GE<AB>C#DC#D" 



340 DATA "05L16EDC#DEDC#<B” , "A>DC#<BAGF#E" 

350 DATA "04L8D>DDD“ , "DDDD” 

360 DATA “05L8DEEE" , “EEEE" 

370 DATA "05L8EEEE" , “ELI 6< AB>C#8C#D" 

380 DATA "05L1 6E8C8DE8EF#" , “G8GF#G8AG“ 

390 DATA "05F#8F#EF#8GF#“ , ”E8EDE8F#E" 

400 DATA "05D8DEF#8F#G" , "A8F#GA8AB” 

410 DATA "06C8C<B>C8DC“ , "<BGEF#GAF#G" 

420 DATA “05AF#DEF#GEF#", "GF#EGF#EDF#“ 

430 DATA "05EAC#DEF#EF#" , “ GE< AB >C#DC#D “ 

440 DATA ”05EDC#DEGF#E" , " AGF#GAF#DF#“ 

450 DATA "05GF#EF#GBAG“ , "L8F#D<B>E“ 

460 DATA “05L1 6C1K AB>C#DEF#G“ , ”F#EDE<A8>C#8” 

470 DATA “05D<AF#ADF#EG","F#A>D<F#E>D<E>C#" 

480 DATA “05D< A>DEF#AG#B” , “AEC#A<B>A<B>A" 

490 DATA "05AEC#DEF#EF#“ , “GE< AB>C#DC#D" 

500 DATA “05EDC#DEDC#<B“ , " A#>EF#GF#EDC#" 

510 DATA "05DF#<B>C#DEDE" > "F#AD#EF#GF#G“ 

520 DATA "05AC<B>CAC<BA" , "B>CD#EF#GAF#" 

530 DATA “05GE<B>DC#E<A>G" , "F#D< A>C<B>D<G>F#" 
540 DATA "05EC#<G#BA#>C#<F#>E'',”D<B>C#DEF#GE" 
550 DATA ”04A#>EF#EF#EF#E" , "<A#>EF#EF#EF#E" 

560 DATA “04A#>EF#GF#ED#C#","<A>D#F#D#F#D#F#D#" 
570 DATA “04A>D#F#D#F#D#F*D#","<A>D#F#ED#C#<BA" 
580 DATA “04G#>DEDEDED" , "<G#>DEDEDED" 

590 DATA "04G#>DEF#EDC#<B",“G>C#EC#EC#EC#" 

600 DATA “04G>C#EC#EC#EC#" , “<G>C#EDC#<BAG" 

610 DATA "04F#DEGF#AG#B","AF#G#BA>C#<B>D" 

620 DATA " 05C#< AB >DC#EDF# " , “ E8 . F#< B8 . A " 

630 DATA ”04AB>C#DEF#EF#" , ”GE< AB>C#DC#D" 

640 DATA "05EDC#DEDC#<B , ', , 'L8A>F#<B>D#&" 

650 DATA "D#F#<A>D#&“ ,"D#F#<B>D#" 

660 DATA ”05L16E8<EF#G#8G#A' , , ,, B8G#AB8B>C#" 



670 DATA "05D8DC#D8ED" , “C#8C#<B>C#8DC#" 

680 DATA "04B8BAB8>C#<B” , "A8AB>C#8C#D" 

690 DATA " 05L 1 6E8C#DE8EF# " , “ G8GF#G8 AG " 

700 DATA "05F#D<B>C#DEC#D","EC#<A#B>C#D<B>C# M 
710 DATA "05DEC#DEDC#<B",">L8F#F#F#F#" 

720 DATA "05L8F#F#F#F#" , "F#F#F#F#L16" 

730 DATA "05F#EF#GF#BA#B“ , “EDEF#EGF#E" 

740 DATA “05L8DF#G<B“ , “L16A#F#G#A#B>C#DE" 

750 DATA ”05F#GF#EDC#<BA#" . "L8B>C#<F#A#" 

760 DATA "04L1 6BF#DF#B>DC#E" , "DF#BDC#BC#A#” 

770 DATA “05L1 6BF#DF#<B>D<G#>E#" , "F#C#<A>F#<G#>F#<G#>E#" 
780 DATA "F#C#<A>C#F#G#AF#" , “ C< B >CAC< B >CA " 

790 DATA "04BAB>C#D#EF#G" , "AF#D#F#<B>AGF#" 

800 DATA "05GE<BGB>EGA" , “G#F#G#BG#F#G#B" 

810 DATA "05AEC#E<AB>C#D" , "EF#GAGF#GE" 

820 DATA "F#D<A>C<B>D<G>F#" , "EC#<GBA>C#<F#>E“ 

830 DATA "05D<BF#AGBE>D" , "C#E<A>C#DF#<A>D“ 

840 DATA " 05EG< A >EF# ADF# " . " C#E< A >C#EGF#E " 

850 DATA "05F#D<B>D<G#>F#ED","C#DC#<BAG#F#E" 

860 DATA "04DHABABABA" , “D#ABABABA" 

870 DATA "04D#AB>C<BAG#F#" ■ "DG#BG#BG#BG#" 

880 DATA "04DG#BG#BG#BG#" , "DG#BAG#F#ED" 

890 DATA "04C#GAGAGAG“ , ”C#GAGAGAG" 

900 DATA "04C#GABAGF#E","CF#AF#AF#AF#" 

910 DATA "04CF#AF#AF#AF#” , "CF#AGF#EDC“ 

920 DATA "03BGA>C<B>DC#E" , "D<B>C#EDF#EG" 

930 DATA "04F#DEGF#AGB" , " ADF#A>DF#ED" 

940 DATA ”05C#8<AB>C#8C#D" . "E8C#DE8EF#" 

950 DATA "05L1 6G8GF#G8AG" . ”L8F#ADF#&" 

960 DATA "F#ACF#8." , "F#ADF#" 

970 DATA "05L8GBDG8&" , "G#BEG#" 

980 DATA "05L1 6AEC#DEF#EF#“ , "GE<AB>C#DC#D” 

990 DATA "05L16EDC#DEDC#<B" , "A>DC#<BAGF#E" 

1000 DATA "04L8D>DDD“ , "DDDD" 

1010 DATA "05L8DEEE" , "EEEE" 

1020 DATA "05L8EEEE" , “EL16<AB>C#8C#D" 

1030 DATA "05L1 6E8C#DE8EF#" . “G8GF#G8AG" 

1040 DATA "05F#8F#EF#8GF#" , "E8EDE8F#E" 

1050 DATA "05D8DEF#8F#G" , "A8F#GA8AB” 

1060 DATA "06C8C<B>C8DC" , "<BGEF#GAF#G" 

1070 DATA "05AF#DEF#GEF#" , "GF#EGF#EDF#" 

1080 DATA "05EAC#DEF#EF#" . "GE<AB>C#DC#D" 

1090 DATA "05EDC#DEGF#E" , " AGF#GAF#DF#" 

1100 DATA "05GF#EF#GBAG" , "L8F#D<B>E“ 

1110 DATA "05L16C#<AB>C#DEF#G" , "F#EDE<A8>C#8“ 

1120 DATA "T70O5D4&DEF#D" , "<A4&AB>C<A" 

1130 DATA "04F#4&F#GAF#" > "D4&D.L32EF#GAB" 

1140 DATA "05L16C8.CD8 .E" , "D8 .C<B8. A" 

1150 DATA "04B4G4" , "B4 . >C#8“ 

1160 DATA "05D48DC#DE", "D44.E8" 

1170 DATA "05F#4&F#AGF#" , "B8.AG8.Ftt” 

1180 DATA "05G8 . F#E8 . F#" , "F#4 . E8" 

1190 DATA "05E48.EEDC#" . "D8 . BE8. D" 

1200 DATA "05C#8.<A>C#8.E”, "A4.A8" 

1210 DATA "05A4&A. L32<B>C#DEF#" ■ “G4.G8" 

1220 DATA "05G4&G16. L32F#EDC#<B" , "A8.GF#G8. >E16" 

1230 DATA "04L1 6F#48F#GAB" , “ >C4 . D8" 

1240 DATA "04B4&BAGF#" , "EF#GAB>C#D<B" 

1250 DATA “05C#DC#<BAB>C#D" , "EF#GAGF#GE" 

1260 DATA ”05F#8. (EDC#) 16D8 . <B" , " >C#4. D8" 

1270 DATA “Tl 00O5D8<AB>C#8C#D" , “E8C#DE8EF#“ 

1280 DATA "05D1" 

1290 OPEN "DATA A.M-1" FOR OUTPUT AS #1 
1300 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT I 
1310 RESTORE 50: FOR 1=1 TO 46:GOSUB *PLAY : NEXT I 
1320 RESTORE 290: FOR 1=1 TO 198:GOSUB «PLAY : NEXT 1 
1330 RESTORE 300: FOR 1=1 TO 194:GOSUB *PLAY : NEXT I 
1340 RESTORE 1280:GOSUB *PLAY 
1350 CLOSE: END 
1360 *PLAY 

1370 READ A$: PRI NT A$:WRITE #1,A$ 

1380 RETURN 



U*h2 



10 • [ OVERTURE ] Part of 2nd violin 

20 ' Programed by D.Kobayashi in June, 1985 

30 'save "MUSIC1.M8B" 

40 DATA "T70O4V10Q802L16” 

50 DATA "04L1 6R8R1 6AA8. F#" , “F#8.DD8. B" 

60 DATA " 04B8 . GG8 . E “ , “ E8 . >EE8 . C# " 

70 DATA "05C#8.<GG8. >G" , "G8.EE8.C#" 

80 DATA "05D2&” , “D8. <F#A8. >C#" 

90 DATA " 05D8 . F#F#8 . D " , " D8 . < BB8 . G# " 

100 DATA " 04G#8 . BB8 . G# " , “ E4A4 " 

110 DATA "04A8 . G#A8 . B" , "E4B4" 

120 DATA “ 04A8 . EA8 . B " , " >C4 . C8 " 

130 DATA “04D#4F#4", "B8.B>C8.<B" 

140 DATA “L16B8 . >EE8. <B" , "G4.G8" 

150 DATA "F#4.A#8","B4.>C#8” 

160 DATA “L16<B8.A#B8.B" , "A#4.B8" 

170 DATA "L16B8.<BB8. >D#",”F#4.F#8" 

180 DATA “E8. >EE8.D” , “C#8.C#C#8.<B“ 

190 DATA "A4. A8" , “A4. A8" 

200 DATA " B8 . AG#8 . F# ” , " E8 . G# A8 . B " 

210 DATA "A4.A8","G#4.E8" 

220 DATA " L 1 6E8 . >EE8 . C# ” , " < A4&AGF4E " 

230 DATA ”D4 .<A8" , " >A8.GA8. F#" 

240 DATA “G8.F#G8.A" , "B8. >C#D8.E“ 

250 DATA "< A8 . EC#8 . <A“ , “ >A8 . F#D8 . A“ 

260 DATA " A4.G8' 1 , "E8 . F#F#8. D” 

270 DATA “ A4. A8" , “A8. >D32C#32D8. E" 

280 DATA "C#l" 

290 DATA "T100O5C#4R4",“" 

300 DATA "R2",“R804DEF#8F#G" 

310 DATA "A8F#GA8AB“ , " >C8C<B>C8DC" 

320 DATA "<B8GAB8B>C#" , "D8DC#D8ED" 

330 DATA "L8C#E<A>C#" , “C#E<G>C#" 

340 DATA “C#E< A>C#“ , “LI 6D< AF#GABAB" 

350 DATA “ >C< ADEF#GF#G” , " AGF#GAGF#E" 

360 DATA "L8DBEG#” , "G#BDG#" 

370 DATA “ G#BEGtt “ , " L 1 6A >AC#DEF#EF# " 

380 DATA "GE<AB>C#DC#D'\”EDC#DEDC#<B" 

390 DATA "A8F#8B4" , "B8A#B>C#<BAG#" 

400 DATA "F#>F#<B>C#DEDE" , "F#ADEF#GF#G" 

410 DATA "AGF#GAGF#E" , "D8<B8>E4" 

420 DATA ”E8<A8>D4” , "D8C#8DC#<B>D" 

430 DATA "L8C#E<A>C#" , "C#E<G>C#" 

440 DATA “ C#E< A >C# " , " D< A >D4 " 

450 DATA "D<GE>C#" , "D<ADG" 

460 DATA "LI 6EC#DE< A8 > >C#8 “ , " L8D< BAA " 

470 DATA "A4R8A" , "ABBA” 

480 DATA " A4R8B " , " >C#< A >F#E " 

490 DATA "E4R8E" , "EER8E" 

500 DATA "C#C#R8C#" , “C#< A#R8A#" 

510 DATA "BF#R8B" , " >CCR8C" 

520 DATA " < F0AR8A " , " D#BR8 >D# " 

530 DATA "E4R4" , " " 

540 DATA 

550 DATA "L16R8<F#G#A#8A#B",">C#8<A#B>C#8C#D” 
560 DATA "E8EDE8F#E“ , "D#4<B4" 

570 DATA "R4>D#4“ , "R4F#4" 

580 DATA "R8<EF#G#8G#A" ,"B8G#AB8B>C#" 

590 DATA "D8DC#D8ED","C#4<A4" 

600 DATA "R4>C#4" , "R4E4" 

610 DATA “D4R4” , " " 

620 DATA 

630 DATA " R8L8E< A >C# “ , “ C#E< G >C# “ 

640 DATA "C#E<A>Cr',“L16DC#DEF#GF#G" 

650 DATA "AF#<B>C#D#ED#E" , "F#ED#EF#ED#C#“ 

660 DATA "L8<B>EEE“ , "EEEE" 

670 DATA ”EEE<B","L16AG#ABAG#F#A" 

680 DATA "G#AG#F#E#8G#8","A>C#<F#G#ABAB" 

690 DATA " >C#E< AB>C#DC#D“ , "EDC#DEDC#<B" 

700 DATA "L8AF#B4" , "B>E< A#F#" 

710 DATA "LI 6F#GEF#G8E8“ , “ >C#F#< A#B>C#DC#D" 
720 DATA ”EC#<F#G#ABAB".">C(KBAB>C#EDC#" 

730 DATA "<B8F#8B4" , "L8BEC#A#“ 

740 DATA "BBBE" , "C#4R8>C#“ 

750 DATA "<BA#F#F#", ”DGF#F#" 

760 DATA "F#4R8F#","F#GGF#" 

770 DATA ”F#4R8>C#","C#DDC#“ 

780 DATA "C#4R8C#" , "<AAR8A" 

790 DATA "D#AR8B" , "BBR8B" 

800 DATA “B>ER8E" , ”<BBR8B" 

810 DATA " >C#ER8E" , "C#C#R8C#" 

820 DATA ”DF#F#R8" , "R8EER8" 

830 DATA "R8DDR8" , "R8E<A>F#" 

840 DATA "C#E<AA","A2" 

850 DATA "A>F#<B>G#" , "A4R4" 

860 DATA "<A4>F#4" , "R4D#4" 

870 DATA "R4<B4", "R8L1 6EF#G#8G#A" 



880 DATA "B8G#AB8B>C#" , "D8DC#D8C#<B" 

890 DATA " >C#4E4" , "R4C#4" 

900 DATA "R4<A4" , "R8DEF#8F#G“ 

910 DATA ” A8F#GA8AB" , " >C8C<B>C8<BA” 

920 DATA "B4R4" . " " 

930 DATA 

940 DATA "R8L8>E<A>C#" , "C#E<G>C#" 

950 DATA "C#E<A>Cr',“L16D8<DEF#8F#G" 

960 DATA " A8F#GA8AB" , " >C8C<B>C8DC“ 

970 DATA "<B8GAB8B>C#" , "D8DC#D8ED" 

980 DATA "L8C#E<A>C#" , "C#E<G>C#" 

990 DATA "C#E<A>C#“ , “L16D<AF#GABAB" 

1000 DATA " >C<ADEF#GF#G" , "AGF#GAGF#E" 

1010 DATA "L8DBEG#" , "G#BDG#" 

1020 DATA "G#BEG#" , "L16A>AC#DEF#EF#" 

1030 DATA "GE<AB>C#DC#D" , "EDC#DEDC#<B" 

1040 DATA "A8F#8B4" , "B8A#B>C#<BA#G#" 

1050 DATA "F#>F#<B>C#DEDE“ , "F#ADEF#GF#G" 

1060 DATA "AGF#GAGF#E" , "D8<B8>E4" 

1070 DATA "E8<A8>D4" . "D8C#8DC#<B>D" 

1080 DATA "L8C#E< A>C#" > "C#E<G>C#“ 

1090 DATA "C#E<A>C#" , “D<A>D4" 

1100 DATA "D<GE>C#" , "D<ADG“ 

1110 DATA " L 1 6EC#DE< A8 > >C#8 " , " L8D< BAA " 

1120 DATA “T70L16A8.DD8.F#" . "F#8. AA8.F#" 

1130 DATA " D8 . F#F#8 . A " , " A8 . >CC8 . < A " 

1140 DATA "F#4 . F#8" , "G8 . AG8 . F#" 

1150 DATA “G8. BB8.G" , "D4.E8" 

1160 DATA "<A8. >DF#8.G" , "A8. >CC8.<B” 

1170 DATA "B8.F#D#8.A" , "<B8. >>D#E8.F#" 

1180 DATA “ E8 . D#E8 . F# " , “ D4 . E8 " 

1190 DATA "E8.<EE8.G#","B4.B8" 

1200 DATA " A8 . CE8 . A " , " >C#4 . < A8 " 

1210 DATA "F#8. >DD8.C#“ , “<B4.B8" 

1220 DATA " A8 . >C#C#8 . E " ■ ” E8 . DE8 . C# “ 

1230 DATA "D8. < AA8 . F#" ■ "F#8 . DD4" 

1240 DATA "D8.FSG8. A" , "B8. >C#D8.E" 

1250 DATA "< A8 . EC#8.<A" , “ >A8 . F#D8 .A" 

1260 DATA " A8 . GA8 . B" , " A4A4" 

1270 DATA "T 1 00A4R4 " , " " 

1280 DATA "Al" 

1290 OPEN "DATA B.M-1" FOR OUTPUT AS #1 
1300 RESTORE 

1310 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT 1 
1320 RESTORE 50: FOR 1=1 TO 46:GOSUB *PLAY : NEXT I 
1330 RESTORE 290: FOR 1=1 TO 198:GOSUB *PLAY : NEXT I 
1340 RESTORE 300: FOR 1=1 TO 194:GOSUB »PLAY : NEXT I 
1350 RESTORE 1280:GOSUB «PLAY 
1360 CLOSE: END 
1370 *PLAY 

1380 READ B$ : PR I NT B$:WRITE #1.B$:RETURN 



'J3.I-3 

10 • C OVERTURE ] Part of Viola 

20 ' Programed by D.Kobayashi in June, 1986 

30 'save "MUSIC1.M8C" 

40 DATA "T70O4V7Q8L16" 

50 DATA ''R4R8R1 6A" , " A8 . F#F#8 . D" 

60 DATA "D8.BB8.G","G8.GG8.E" 

70 DATA "G8.C#C#8. E" , “<A8. >AA8. A" 

80 DATA "A2","A8.DF#8.G" 

90 DATA " A8 . >DD8 . < A " , " F#8 . DD8 . < B “ 

100 DATA "B8. G#G#8. B" , ” >E4F#4" 

110 DATA " F#8 . ED8 . C# " , “ < B4 >E4 “ 

120 DATA "E8.C#E8.G","F#8.D#E8.G“ 

130 DATA " F#4B4 " , " B8 . EE8 . D# " 

140 DATA "E8.BB8.G" , "E4.D8" 

150 DATA "C#4.C#8","D8.EF#4" 

160 DATA ”F#8 . EF#8 . G" , "F#4F#4" 

170 DATA "F#2" , "R8R1 6<BB8 . >D#" 

180 DATA " < B8 . G#B8 . >E " , " G#4 . E8 " 

190 DATA "C#8.AA8.G" , "F#8.F#F#8.E“ 

200 DATA "D2","D8.DC#8.<B" 

210 DATA " >E8 . DE8 . F# " , " E4D4 " 

220 DATA " C#2 “ , " C#8 . C#D8 . E “ 

230 DATA "F#8.AA8.F#”,"F#4D4" 

240 DATA "D8 . DE8 . F#" , ”G8 . EF#8 ,G" 

250 DATA “E8 . AA8 . E" , “E8 . C#D8 . E" 

260 DATA "D4.D8" , "A8.AA8.F#" 

270 DATA " E8 . DE8 . < A " , “ >A4 A4 " 

280 DATA "Al" 

290 DATA "T1 00O4A4R4" , " " 

300 DATA 
310 DATA 
320 DATA ‘"V"' 

330 DATA ”R8<AB>C#8C#D","E8C#DE8EF#" 

340 DATA "G8GF#G8AG" , "L8F#ADF#" 

350 DATA "F#ACF#","F#ADF#“ 

360 DATA "L16GBG#AB>C#<B>C#" , ”DC#<EF#G#AG#A" 
370 DATA "BAG#ABAG#F#" , "E4R8A8" 



380 DATA "L8AAAA" , " AAAA" 

390 DATA "AL1 6DEDC#<B>D" , "C#DC#<BA#8>C#8“ 

400 DATA "L8DF#<B>D" , ''D>DDD“ 

410 DATA "DDD< A" , "BBBB" 

420 DATA "AAAA" , "GAAA” 

430 DATA "AAAA", "AAAA" 

440 DATA "AAAA" , "ADF#B" 

450 DATA "B>C#16D16C#<A" , "AAGB" 

460 DATA "AEAA" , “LI 6AGF#GEF#GE” 

470 DATA "F#4R8L8E","DF#GG" 

480 DATA "F#4R8E","EF#F#B" 

490 DATA " >C#4R8C#“ , “C#C#R8<B" 

500 DATA "A#A#R8A#" , “F#F#R8F#" 

510 DATA "FHDR8F#” , "D#AR8D#" 

520 DATA "D#F#R8F#","F#F#R8B" 

530 DATA "B4R4” , " " 

540 DATA 

550 DATA "R4>C#4" , "R4<A#4" 

560 DATA "R4F#4","R8L16<B>C#D#8D#E" 

570 DATA "F#8D#EF#8F#G#" , "A8AG#A8BA“ 

580 DATA "G#4B4" , ”R4G#4" 

590 DATA "R4E4" , "R8<AB>C#8C#D" 

600 DATA "E8CHDE8EF#" , "G8GF#G8AG" 

610 DATA “F#4R4L8" , " " 

620 DATA 

630 DATA "R8AAA" , "AAAA" 

640 DATA "AAAA" , "ABBB" 

650 DATA "BBBB" , "BBBBL16" 

660 DATA "B>E<G#AB>C#<B>C#“ , "D<BEF#G#AG#A" 

670 DATA "BAG#ABAG#F#" , "E8C#8F#4" 

680 DATA "F#8E#F#G#F#ED#" , "L8C#C#<F#A" 

690 DATA " A >A AA " , " AAAE " 

700 DATA "F#F#F#F#","EGF#F#" 

710 DATA "BF#BB","A#>C#<F#A" 

720 DATA "A>C#<EA#" , " A#>C#<F#A#" 

730 DATA "B<B>DF#" , "GBA#F#" 

740 DATA "F#D<BB" , " >F#4R8A#" 

750 DATA "F#C#<B>D“ , "<B>EDC#" 

760 DATA "D4R8C#" , "<B>DC#C#" 

770 DATA "D4R8G#" , "AF#BB" 

780 DATA "A4R8F#" , "F#F#R8F#" 

790 DATA "F#F#R8F#","D#F#R8D#" 

800 DATA "EGR8B" , “EER8E" 

810 DATA "EAR8A" , "AER8A" 

820 DATA "AR8R8G" , "GR8R8F#" 

830 DATA "FHR8R8E" , "EGF#D“ 

840 DATA "AC#DF#" , "EGC#<A" 

850 DATA " >D2" , "E4R4<L1 6" 

860 DATA "R8B>C#D#8D#E" , "F#8DEF#8F#G" 

870 DATA "A8AG#A8BA" , "G4E4" 

880 DATA "R4G#4” , "R4B4" 

890 DATA "R8<AB>C#8C#D" , "E8C#DE8EF#" 

900 DATA "G8GFHG8AG" , "F#4D4" 

910 DATA "R4F#4“ , "R4A4" 

920 DATA "D4R4" , " " 

930 DATA 

940 DATA "R8C#DEF#EF#","GE<AB>C#DC#D" 

950 DATA ”EDC#DEDC#<B","A>AF#GABAB" 

960 DATA " >C<ADEF#GF#G" , "AGF#GAGF#E" 

970 DATA "D<B>EF#G#AG#A","BAG#ABAG#F#" 

980 DATA "E8<AB>C#8C#D" , "E8C#DE8EF#" 

990 DATA "G8GF#G8AG" , "L8F#ADF#“ 

1000 DATA "F#ACF#" , "F#ADF#L16" 

1010 DATA "GBG#AB>C#<B>C#“,"D<BEF#G#AG#A" 

1020 DATA "BAG#ABAG#F#“ , "L8EAAA" 

1030 DATA "AAAA", "AAAA" 

1040 DATA "AL16DEDC#<B>D" , “C#DC#<BL8A#>C#" 
1050 DATA "DF#<B>D" , "D>DDD" 

1060 DATA "DDD<A" , "BBBB" 

1070 DATA "AAAA", "GAAA" 

1080 DATA "AAAA” .“AAAA" 

1090 DATA "AAAA” , "ADF#B" 

1100 DATA " B >C# 1 6D 1 6C#< A " , " AAGB " 

1110 DATA " AEAA " , " L 1 6AGF#GE8E8 " 

1120 DATA "T70FH4R8R1 6D1 6“ , "LI 6D8 . F#F#8 .A" 
1130 DATA "A8.<AA8.>D",“F#8.AA8.F#" 

1140 DATA "D8 . < AA8 . >C" , "D8 . EDB . D“ 

1150 DATA ”D4 . D8" , "G8 . BB8 . G" 

1160 DATA "A4.G8" , "F#8 .EF#8. G“ 

1170 DATA "F#8 . AA8 . >C" , "<F#8 . <B>E8 . B“ 

1180 DATA "B8 . AB8 . >C" , "<B4 . B8” 

1190 DATA " B2 “ , “ R8R 1 6EE8 . Gtt " 

1200 DATA “E8 . AA8 . G" , "F#8 . F#F#8 . E" 

1210 DATA "D8 . <B>F#8 . D” , "D8 . < A>E8 . E” 

1220 DATA "E8.AA8.E", "A4.A8" 

1230 DATA " A8 . F#F#8 . D” , "< A8 . >DF#8 .A" 

1240 DATA "G8. DE8. F#" , “G8. EF#8.G" 

1250 DATA "E8 . AA8 . E" , "E8 . C#D8 . E" 

1260 DATA "<A8. >ED8.G" , "E4.F#8" 

1270 DATA "T 1 00F#4R4" , " " 

1280 DATA "F#l " 

1290 OPEN “DATA C.M-1" FOR OUTPUT AS #1 
1300 RESTORE 

1310 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT 1 



100 



1320 RESTORE 50: FOR 1=1 TO 46:GOSUB *PLAY : NEXT I 
1330 RESTORE 290: FOR 1=1 TO 198:GOSUB *PLAY : NEXT I 
1340 RESTORE 300: FOR 1=1 TO 194:GOSUB »PLAY : NEXT I 
1350 RESTORE 1280:GOSUB *PLAY 
1360 CLOSE: END 
1370 #PLAY 

1380 READ C$: PRINT C$:WRITE #1,C$:RETURN 



10 ’ [Overture! Part of Harpsichord 

20 ' Programed by D.Kobayashi in June, 1985 

30 'save “MUSIC1 . M8D" 

40 DATA "T70O4V6Q8@0L16" 

50 DATA “04D2" , " " 

60 DATA 

70 DATA "R4DF#ED" , “C#8.EC#8.<A" 

80 DATA ">D2"."RDC#<BAGF#E" 

90 DATA " D2 " , ” >D2 ” 

100 DATA “ R8 . DC#8 . < B " , " >C#4F#4 ” 

110 DATA " < B >C#DEF#G#AF# " , " G#4 . F#G# " 

120 DATA " A2 " , “ " 

130 DATA "RGF#ED#C#<BA" , "G8.GA8.B" 

140 DATA "E2" , " >E2" 

150 DATA "R8.GF#8.E","D8.C#<B8.A#" 

160 DATA "B8. >C#D8.E" , “F#8 .E32D32E8.F#" 

170 DATA "D#2","RC#<B>C#D#C#D#<B" 

180 DATA “ >E2" ■ "RDC#DEDEC#" 

190 DATA "F#2","RGF#EDEDC#" 

200 DATA "<B4&BB>C#D" , "<G#8.EF#8.G#" 

210 DATA " A8 . B>C#8 . D“ , "E4<E4" 

220 DATA "A2" , “R4RBAG" 

230 DATA "F#4&F#GF#E" , "D8.EF#8.D" 

240 DATA “G2" , ” >G2” 

250 DATA "R4RF#ED" , “C#8 . < AB8 . >C#" 

260 DATA "D8.EF#8.G","ABAGF#GAB" 

270 DATA ">C#<BAB>C#DEC#","D4<D4" 

280 DATA " < A8 . >AA8 . EE8 . C#C#8 . < A " 

290 DATA "T100O3A4R4" , " ” 

300 DATA 
310 DATA 
320 DATA 
330 DATA 

340 DATA " " , "R804DEF#8F#G" 

350 DATA " A8F#GA8AB" , “ >C8C<B>C8DC“ 

360 DATA "<B8EF#G#8G#A" , "B8G#AB8B>C#" 

370 DATA "D8DC#D8ED" , "C#8E8<A8>C#8" 

380 DATA "L8C#E<G>C#",”C#E<A>C#" 

390 DATA "<D>D<GB" , "C#>C#<F#A#" 

400 DATA "<B>BAG" , "F#BAG" 

410 DATA "F#ADA" , "<G>GC#E" 

420 DATA "<F#>F#<B>D“ , "<EA>D<D" 

430 DATA “AL16AB>C#8C#D" , "E8C#DE8EF#" 

440 DATA "G8GF#G8AG" , "F#8F#EF#8GF#" 

450 DATA "E8EDE8F#E" , "DEF#DGAF#G" 

460 DATA "L8AGF#E" , "DGA<A" 

470 DATA " >D4R8C#8" , "D<BGA" 

480 DATA ”D4R8>D" , "C#F#DE" 

490 DATA "<A>AAA" , "R8GGG" 

500 DATA "R8F#F#F#" , "R8<F#F#F#" 

510 DATA "R8BBB" , "R8>F#F#F#" 

520 DATA "R8D#D#D#" , "R8<BBB“ 

530 DATA " >E>E<A>Ct" , "<D>D<GB" 

540 DATA "C#>C#<F#A#","<B>BGE" 

550 DATA "F#4R4" , "<F#4R4" 

560 DATA "R8>F#A#F#" , “B4R4" 

570 DATA "<B4R4" , "R8>B<B>D#" 

580 DATA "E4R4" , "<E4R4" 

590 DATA " >R8EG#E" , " A4R4" 

600 DATA "<A4R4” , "R8>A<A>C#" 

610 DATA "DC#DE" ■ ”F#EF#G#" 

620 DATA "AG#AF#" , "C#DE<E" 

630 DATA “ AL1 6AB>C#8C#D" , "E8C#DE8EF#" 

640 DATA “G8GF#G8AG" , "F#8<B>C#D#8D#E" 

650 DATA "F#8D#EF#8F#G#''."A8AG#A8BA" 

660 DATA "L8G#BEG#","G#BDG#" 

670 DATA "G#BEG#" , “< A>ADF#" 

680 DATA "<G#>G#C#E#","<F#>F#ED" 

690 DATA "C#F#ED" , "C#E<A>C#" 

700 DATA "D>D<GB" , "C#>C#<F#A#" 

710 DATA " < B >BEG " , “ F#L 1 6< F#G#A#8A#B " 

720 DATA " >C#8< A#B>C#8C#D" , "E8EDE8F#E" 

730 DATA "D8DC#D8ED","C#8C#<B>C#8DC#" 

740 DATA "<B>C#D<B>EF#GE"."F#4R8E8" 

750 DATA "L8DF#BF#","GEF#<F#" 

760 DATA "B4R8>A#" ■ "BGEF#" 

770 DATA "<B4R8>B" , “A>D<B>C#" 

780 DATA "<F#F#F#F#" , "R8EEE 11 
790 DATA "R8D#D#D#" , "R8<BBB" 

800 DATA "R8>EEE" , “R8DDD" 

810 DATA "R8C#C#C#","R8<AAA" 

820 DATA ">D>D<GB","C#>C#<F#A" 



830 DATA "<B>BEG","<A2" 

840 DATA 

850 DATA " " , "RB>C#<A" 

860 DATA "F#4R4" , "B4R4" 

870 DATA “R8B>D#<B", ">E4R4“ 

880 DATA "<E4R4",“R8E>E<G#“ 

890 DATA " A4R4 " , " >A4R4" 

900 DATA " R8< A >C#< A " , " >D4R4 “ 

910 DATA "<D4R4","R8>D<DF#" 

920 DATA ”GF#GA“ , "BAB>C#" 

930 DATA "DC#DE" , ”F#EF#G" 

940 DATA “AAAA" , "AAAA" 

950 DATA " AEC#< A ” , " >D >DDD " 

960 DATA "DDDD" , ”D< AF#D" 

970 DATA “G>EEE" , "E<BG#E" 

980 DATA "A4R4" , "<A4R4" 

990 DATA " >A4R4" , "R8L1 6DEF#8F#G" 

1000 DATA " A8F#GA8AB" , " >C8C<B>C8DC" 

1010 DATA "<B8EF#G#8G#A" , "B8G#AB8B>C#" 

1020 DATA “D8DC#D8ED" , “L8C#E<A>C#" 

1030 DATA "RE<G>C#" , “RE<A>C#" 

1040 DATA "<D>D<GB' , ,"C#>C#<F#A#" 

1050 DATA "<B>BAG" , "F#BAG” 

1060 DATA "F#ADF#","<G>GC#E" 

1070 DATA "<F#>F#<B>D”, "<EA>D<D" 

1080 DATA "L16A8AB>C#8C#D",''E8C#DE8EF#" 

1090 DATA “G8GF#G8AG","F#8F#EF#8GF#" 

1100 DATA "E8EDE8FHE" , "DEF#DGAF#G" 

1110 DATA "L8AGF#E" , "DGA< A" 

1120 DATA "T70O4D2" , " " 

1130 DATA 

1140 DATA "R4L16RC<BA" , "B8. >CD8.<D" 

1150 DATA "G2" , " >G2" 

1160 DATA "F#2" , "RGABAGF#E" 

1170 DATA " D#2 " , “ R8 . < B >C#8 . D# " 

1180 DATA "E8. F#G8. A" , "B8 . A32G432A8 . B" 

1190 DATA “G#2" , "RF#EF#G#F#G#E" 

1200 DATA “A2" , "RGF#GAGAF#" 

1210 DATA "B2" , “R>C<BAGF#ED" 

1220 DATA " C#2 " , " RDC#< BAB >C#< A " 

1230 DATA " >D2" , "REDC<BAGF#" 

1240 DATA "G2“,"" 

1250 DATA ”R4RF#ED" , "C#8. AB8. >C#" 

1260 DATA "D8. EF#8.G" , "A4< A4" 

1270 DATA "T100D4R4" , " " 

1280 DATA " D 1 “ 

1290 OPEN "DATA D.M-1" FOR OUTPUT AS #1 
1300 RESTORE 

1310 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT I 
1320 RESTORE 50: FOR 1=1 TO 46:GOSUB *PLAY : NEXT I 
1330 RESTORE 290: FOR 1=1 TO 198:GOSUB *PLAY : NEXT I 
1340 RESTORE 300:FOR 1=1 TO 194:GOSUB *PLAY:NEXT I 
1350 RESTORE 1280:GOSUB *PLAY 
1360 CLOSE: END 
1370 #PLAY 

1380 READ D$:PRINT D$:WRITE #1,D$:RETURN 



U^h5 

10 ' COVERTURE] Part of 1st Trombone 

20 ' Programed by D.Kobayashi in June, 1985 

30 'save "MUSIC1.M8E" 

40 DATA "T70O4V7Q882L1 6” 

50 DATA "05L8A4" , "A4" 

60 DATA "B4" , “G4L16" 

70 DATA "R8R16GG8.E" , "E8.AA8.E" 

80 DATA "F#8. AA8. F#" , “F#8. DD8. <A" 

90 DATA "A8.AA8.F#","D8" 

100 DATA "05E4&L1 6EEF#G#" , " A8. EC#8 . <A" 

110 DATA "05L32D4 . D8“ , "D8 . EF#E8 . D1 6 " 

120 DATA “05L1 6C#8 . < A>C#8 . E" , " A8 . G32F432G8 . E“ 
130 DATA "05L32B4 . D#8" , "E8 . F#1 6F#8 . EF#“ 

140 DATA "05L1 6G4&GF#ED“ , “C8 . CD8 . E" 

150 DATA "04L16A#4.>G8","F#8.ED8.C#" 

160 DATA “05L1 6D8 . C#<B8 . >C#" , "C#4 . <B8" 

170 DATA “04L1 6B4&BBAG#" , " A8 . >F#< A8 .G#" 

180 DATA "04L1 6G#8 . EG#8 . A“ , " >E4 . E8" 

190 DATA "05L16E4&E<AB>C#" , ”dc#def#ef#g#'' 

200 DATA "05L1 6AG08 . F#E8 . " , "B4 . D8" 

210 DATA ”05L8C#4.<B" , "B4. A" 

220 DATA " R8R 1 6L 1 606C#C#8 . < A ” , " A8 . " 

230 DATA "R8R16>DD8.<A","A8." 

240 DATA “04L16B4&BAGF#" , “EF#GAB>C#D<B" 

250 DATA "05R8R16EE8.A", "A8.AG8.A" 

260 DATA ”F#8 .GA8 . B" , "E8 . AD8 .A" 

270 DATA "<A8. >AG8. A" , ”F#8 . A>D8. <B“ 

280 DATA " >C#2” 

290 DATA "T100V8O6C#4" , '‘V6“ 

300 DATA "05L16G8GF#G8AG" , "L8F#ADF#&" 

310 DATA "05L8R ACF#&" , "FSADF#" 

320 DATA "05L8GBDG#&" , "G#BEG#" 

330 DATA “05L16AEC#DEF#EFtr , "GE<AB>C#DC#D" 
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340 DATA " 05L 1 6EDC#DEDCtt< B" , "A >DC*< BAGF#E " 

350 DATA "V805L8R8DDD" , "DF#F#A“ 

360 DATA “G“ i “R8EEE" 

370 DATA “ EG#G#B " , " A " 

380 DATA "V6L16E8C#DE8EF#" , "G8GF#G8AG“ 

390 DATA "05F#8F#EF#8GF#“, "E8EDE8FfE“ 

400 DATA "V8R8L16DEF#8F#G",“A8F#GA8AB" 

410 DATA ” >C8C<B>C8DC" , "L8<BR4B" 

420 DATA "05AR4A" , “LI 6GF#EGF#EDF#“ 

430 DATA “05E8" . "R8<L8AAA” 

440 DATA " A >EEA " , " AR4L 1 6BA " 

450 DATA "G8R4AG" , "L8F0ABG" 

460 DATA " >C#< A>D<G“ , “F#R8E" 

470 DATA “0"."“ 

480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA •"V" 

540 DATA 

550 DATA "V6R8L804Q5F#F#F#“ , "F#F#F#F#“ 

560 DATA “F#F#F#F#","<38Ftt" 

570 DATA " >D#2" , " " 

580 DATA “ D2 " . " " 

590 DATA "D2" , "C#< AAA" 

600 DATA "AAAA" , "A>EAE" 

610 DATA "F#",“" 

620 DATA 

630 DATA "R8V8EAE" , "G16E1 6EGE" 

640 DATA " L 1 6EDEDE8F#E " , " L8DF# AF# " 

650 DATA "D#F#AF#","L16F#EF#EF#8G#F#" 

660 DATA “L8EEEE" , "EEEE" 

670 DATA "EBG#B" > " >C#L1 6" 

680 DATA '‘V604B8BAB8>C#<B" , " A8AB>C#8C#D" 

690 DATA “05L16E8C#DE8EF#",“G8GF#G8AG" 

700 DATA “05F#D<B>C#DEC#D" , "EC#<A#B>C#D<B>C#“ 

710 DATA "05DEC#DEDC#<B“ , “ >L8F#Q5F#F#F#" 

720 DATA "05L8F#F#F#Fr\''F#F#F#F#" 

730 DATA “05Q8B8" . " " 

740 DATA "05L8DF#G<B" , "L16A#F#G#A#B>C#DE" 

750 DATA "05F#GF#EDC#<BA#" , "L8B>C#<F#A#" 

760 DATA "04L16BF#DF#B>DC#E" ■ "DF#BDC#BC#A#“ 

770 DATA 
780 DATA 
790 DATA 
800 DATA 

810 DATA " " , "05C#8C#8R8G8" 

820 DATA "L8F#R4F#“ > "ER4E“ 

830 DATA “ER4E" . "ER8ER8" 

840 DATA "F#R8ER8“ , "DR8GR8” 

850 DATA “F#R8G#R8" , "A<L16AAA8A" 

860 DATA "A8" , " " 

870 DATA 
880 DATA 

890 DATA "L8R8AAA" , “AAAA" 

900 DATA "A>EEA“ , "F#<F#F#A" 

910 DATA "A>DDF#“ . "F#AA>D" 

920 DATA “D","" 

930 DATA 

940 DATA "R4<AR8“ , “AR8ER8" 

950 DATA "ER8GR8" ■ “F#R4 . " 

960 DATA "R8<DDD” . ”D>A>D<A" 

970 DATA "B","" 

980 DATA 
990 DATA 

1000 DATA "R8DDD" , "DF#F#A" 

1010 DATA “G" , "R8EEE" 

1020 DATA "EG#G#B“ . "A" 

1030 DATA 
1040 DATA 

1050 DATA “ L 1 605R8DEF#8F#G " , " A8F#GA8AB “ 

1060 DATA "06C8C<B>C8DC" , "<B8R4B8" 

1070 DATA "05A8R4A8" , "GF#EGF#EDF#“ 

1080 DATA "05E8" , “L8< AAA" 

1090 DATA "A>EEA" > "AR4B16A16" 

1100 DATA "GR4A1 6G1 6" > "F#ABG" 

1110 DATA “ >C#<A>D<G" > "F#R8ER8" 

1120 DATA “T70V8O5D4" . "F#4" 

1130 DATA "A4" , " >D4" 

1140 DATA "<R8R1 6A1 6A8 . A1 6" , "LI 6>D8 . < AB8. >C“ 

1150 DATA "04B4" , " “ 

1160 DATA " V505D4&DC#DE” , "D#4.E8" 

1170 DATA "05F#4&F#AGF#“ , "B8. AG8.F#" 

1180 DATA "05G8 . F#E8 . F#“ ■ "F#4 . E8" 

1190 DATA “05E4&EEDCrV’D8.BE8.D” 

1200 DATA " 05C#8 . < A >C#8 . E " ■ " A4 . A8 " 

1210 DATA " 05 A4&A . L32< B >C#DEF# " , " G4 . G8 " 

1220 DATA "05G4&G1 6 . L32F#EDC#<B" , " A8 . GF#G8 . >E16" 
1230 DATA “R8R16L16DD8.F#","F#8.AA8.B" 

1240 DATA "B8" , "G8" 

1250 DATA " R8R 1 6EE8 . A " , “ A8 . BG8 . A " 

1260 DATA " D8 . < A >D8 . < A " . " A8 . F#A8 . A " 

1270 DATA “T1 00V8O4F#4" ■ " " 



1280 DATA “04F#1 " 

1290 OPEN “DATA E.M-1” FOR OUTPUT AS #1 
1300 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT I 
1310 RESTORE 50: FOR 1=1 TO 46:G0SUB *PLAY : NEXT 1 
1320 RESTORE 290: FOR 1=1 TO 198:GOSUB *PLAY : NEXT I 
1330 RESTORE 300: FOR 1=1 TO 194:GOSUB »PLAY : NEXT I 
1340 RESTORE 1280:GOSUB *PLAY 
1350 CLOSE: END 
1360 *PLAY 

1370 READ E$ : WR I TE #1 ,E$: PRINT E$ : RETURN 
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10 ' [OVERTURE! Part of 2nd trombone 

20 ' Programed by D.Kobayashi In June, 1985 

30 'save "MUS1C1.M8F" 

40 DATA "T70O4V7Q8L16" 

50 DATA "05L8F#4" , ”F#4“ 

60 DATA "G4" , “E4“ 

70 DATA "R8L16EE8.A", "A8.EE8.E" 

80 DATA ”D8.F#F#8.D“ , "D8. <AA8. F#“ 

90 DATA ”F#8. AA8.F#" , "D8" 

100 DATA 
110 DATA 
120 DATA “'V"’ 

130 DATA 
140 DATA 
150 DATA 
160 DATA 
170 DATA 
180 DATA 
190 DATA 
200 DATA 
210 DATA 

220 DATA "R8.05L1 6AA8.E" , "E8" 

230 DATA "R8.F#F#8 . D“ , “D8" 

240 DATA 

250 DATA "R8.<AA8. >E“ , “E8 . F#F#8. E" 

260 DATA "<A8","A8" 

270 DATA "R8R16>EE8.E" , "D8.F#A8.G#“ 

280 DATA “A2” 

290 DATA "T1 00V6O5A4" , " " 

300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 

350 DATA " " , "L8DDDD" 

360 DATA "D" , " " 

370 DATA "EEEE" , "E“ 

380 DATA 
390 DATA 

400 DATA “04R8DDD" , “DDDD” 

410 DATA "L16D8>F#GA8BA" . “G8R4G8" 

420 DATA "F#8R4F#8" , "EAAA" 

430 DATA "A8" , " " 

440 DATA "R8<L8AA>E","F#L16AGF#8D8“ 

450 DATA "E8GF#E8<A8","A>DDE" 

460 DATA "< A>EL1 6F#EF#G" , "L8AR8G" 

470 DATA “F#","" 

480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 

550 DATA " " , "R804L8Q5V5F#F#F#" 

560 DATA "F4tF#F#F#","F#" 

570 DATA " V6Q8” , " " 

580 DATA 
590 DATA 

600 DATA "R8AAA" , “AA>E<A“ 

610 DATA “A","" 

620 DATA 

630 DATA ”R4. >E" , “GER8E" 

640 DATA "A<AAA" , "AR4>F#“ 

650 DATA “AF#R8F#"."BF#R4" 

660 DATA “ " , "R8EEE” 

670 DATA “EG#BG#“,”E" 

680 DATA ,,, V" 

690 DATA 
700 DATA 
710 DATA 

720 DATA "Q5R8F#F#F#" , "F#F#F#F#" 

730 DATA "Q8F#“ , " “ 

740 DATA 
750 DATA 
760 DATA "•V" 

770 DATA 
780 DATA 
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790 DATA 
800 DATA 
810 DATA 
820 DATA 

830 DATA " " , “AR8D" 

840 DATA "ER8D” , "AR8E" 

850 DATA "DR8D" . “ELI 6< AAA8A8" 

860 DATA “L8A" , " " 

870 DATA 
880 DATA 

890 DATA " " , "R8AAA" 

900 DATA "AAA>E","D<DDF#" 

910 DATA ”F#AA>D'’ , "DF#F#A" 

920 DATA "B",“" 

930 DATA 

940 DATA “R4E" , "ER8A" 

950 DATA "AR8E" , "DR4<D" 

960 DATA "DDDD" . ”D>F#DF#" 

970 DATA "G" , “ " 

980 DATA 
990 DATA 

1000 DATA " " , "R8DDD" 

1010 DATA "D","" 

1020 DATA "R8EEE" , "E" 

1030 DATA 
1040 DATA 

1050 DATA "R8<DDD" , "DDDD" 

1060 DATA "D>L16F#GA8BA” , “L8GR4G" 

1070 DATA "F#R4F#" , “EAAA" 

1080 DATA "A","" 

1090 DATA "R8< AA>E" , "F#L1 6AGL8F#D” 

1100 DATA " EL 1 6GF#L8E< A " , " A >DDE " 

1110 DATA "< A>EL1 6F#EF#G" , "L8AR8G" 

1120 DATA "T70V8O5F#4“ , "D4" 

1130 DATA "F#4" , "A4" 

1140 DATA “ R8 . L 1 6F#F#8 . A " , " F#8 . F#F#8 . G " 

1150 DATA "F#4" , " " 

1160 DATA 
1170 DATA 
1180 DATA 
1190 DATA 
1200 DATA 
1210 DATA 
1220 DATA 

1230 DATA "R8.<AA8. >D" , "D8.F#F#8.G" 

1240 DATA "G8","B8" 

1250 DATA "R8. <AA8. >E“ . "E8 . F#F#8 . E" 

1260 DATA " D8 . < A >D8 . < A " . “ A8 . F#A8 . A " 

1270 DATA , 'T100V6O4F#4" > “ " 

1280 DATA "04F#1 " 

1290 OPEN "DATA F.M-1" FOR OUTPUT AS #1 
1300 RESTORE: FOR 1=0 TO 47:GOSUB *PLAY : NEXT I 
1310 RESTORE 50:FOR 1=1 TO 46:GOSUB *PLAY : NEXT I 
1320 RESTORE 290: FOR 1=1 TO 198:GOSUB *PLAY : NEXT I 
1330 RESTORE 300: FOR 1=1 TO 194:GOSUB *PLAY : NEXT I 
1340 RESTORE 1280-.GOSUB *PLAY 
1350 CLOSE: END 
1360 *PLAY 

1370 READ F$: WRITE #1,F$:PRINT F$: RETURN 
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20 ’ Programed by D.Kobayashi In 1985 
30 ’save "MUSIC2.M88" 

40 DIM A$I 17) . B$( 17) ,C$C 17) ,D$C 17) 

50 A$( 0 ) = "T3204V792" : B$ ( 0 ) = "T3204V792 " : C$ ( 0 ) = “T3204V604 " : D$ ( 0 ) = "T32O3V5L8024Q8 
60 A$ ( 1 ) = " >F# 1 &F#8L 1 6BGF064E32 . DC#DC#4< B16A8. >A2&" :B$( 1 ) = “D1 &D4B4A2A8L 1 6 >c< b>c8ac" 
70 C$( 1 ) = "G2A2<B4>E4E28,L8ED#D#E" : D$( 1 ) = "D>DC#<C#<B>BA<AG>GG#<G#A>AG<GFtt>F#E<E" 

80 A$ ( 2 > = " L 1 6AF#C< B >ED#AGG2&GE< BA >DC#GF#" : B$ ( 2 ) = " < B8R8R4L 1 6B8 >EDEF#GE< A8R8R4 “ 

90 C$ ( 2 ) = " L8F#R8R4E< BB >EER8R4 " : D$ ( 2 ) = " D# >D#< B >B< E >ED< DC# >C#< A >A " 

100 A$( 3 ) = " F#4 . G#AD8D32E32F#&F#EED" : B$ ( 3 ) = " A2&A8G# 1 6 A 1 6B8G#8 " 

110 C$ ( 3 ) = " C#4 . DEC#< A >D& " : D$ ( 3 ) = " D >DC#< C#< B >BG#E& " 

120 A$ ( 4 ) = " L 1 6C#<BB32 >C#32D&D8C#< BA2 " : B$ ( 4 ) = * L8AA&AG#E2 " 

130 C$ ( 4 ) = " EF#< B >EC#2 " : D$ ( 4 ) = " ADE< EL 1 6Q8AB >C#DEGF#EL8Q6 " 

140 A$ ( 5 ) = " 05C#4&C# 1 6L32DC#< B >C#< A 1 6 >A4 . C8 " : B$ ( 5 ) = " 04 A2 &A 1 6L 1 6B >C8C< BAG " 

150 C$(5)="04E2&E8D#16E1 6F#4&" : D$(5 ) = “03<A >AG< GF# >F#E< E " 

160 A$ ( 6 ) = "L8< B >B&B 1 6L1 6AGF#G4&G32L32F#EDC# 1 6< B1 6 " : B$ ( 6 ) = " F#4 . >D#8E2& " 

170 C$ ( 6 ) = ”L 1 6F#GAF#D#BB4< B4 " : D$ ( 6 ) = " D# >D#F#< B# >E >ED<D" 

180 A$ ( 7 ) = "LI 6 A#B >C#8&C#DE8&EF#G8&G8F#8 " : B$ ( 7 ) = " E2&E 1 6L1 6DC#< BA#B >C#8 “ 

190 C$ ( 7 ) = " >L 1 6C#DEF#GF#GEL8F#E 1 6D 1 6C#F# " : D$ ( 7 ) = " C# >C#< B< BA#B >C#< A# " 

200 A$( 8 ) = "LI 6EDC#<B >C#D32E32D8< B2 " : B$ ( 8 ) = " < L8BBBA#F#2 " 

210 C$ ( 8 ) = " L 1 6F#8EDG8F#ED2 " : D$ ( 8 ) = " L8B >GEF#< B >BA< A " 

220 A$ ( 9 ) = " L 1 6 >D4&DF#EDB4 . A 1 6G# 1 6 “ : B$ ( 9 ) = "E4F#4L1 6< B8 >EF#G#AB8& " 

230 C$( 9 ) = "LI 6<B8 >B8 AG#A8G8 . F#E4 " :D$(9) = "G# >G#F#< F#E >ED< D “ 

240 A$ ( 1 0 ) = "LI 6F#64E32 . A< A8B8 . >C#32D32C#8 . < BA4 " : B$ ( 1 0 ) = "04L8BA4G#A2& “ 

250 C$ ( 1 0 ) = " L8EEF#EL 1 6E8 . DC#DEC# " : D$ ( 1 0 ) = “ C# >C#DE< A >AG< G " 

260 A$ ( 1 1 ) = " >D4 . F# 1 6E 1 6E4 . G 1 6F# 1 6 " : B$ ( 1 1 ) = " A8L 1 6B >C< B >C#D8&D8C#< B >C#D#E8&" 

270 C$ ( 1 1 ) = " < A8 >D4< B8&L8B >E4C#& “ : D$ ( 1 1 ) = “ F# >F#G< GG# >G#A< A " 

280 A$( 1 2) = ’’F#4 . A16G16G2" : B$( 12) = "L1 6E8D#C#D#EF#8&F#D#E<BE4&“ 

290 C$( 1 2)="C#8F#4D#8L16<B4&B>BGE" : D$( 12)="A#>A#B<B>E>ED<D“ 

300 A$( 1 3 ) = "< A4&L1 6A>C#EGGEF#88F#8&F#G32A32" : B$( 1 3)=“L1 6EC#EA>C#8< A8&A8>C#D<D4& 



103 



310 C$ l 1 3 ) = " L8AGF#ED4A4&" : D$ U 3 ) = " C# >C#< A >C#D< DC >C " 

320 A$( 1 4 ) = “D4&L1 6DF#A >C<B4 . D8 " : B$ 1 1 4 ) = " D8E8F#4G28, " 

330 C$ ( 1 4 ) = " A8G8A4D2 “ :D$( 14)="<B<BA >AG< GF# >F# " 

340 AS (15)= "LI 6C#EG4<B8A8L1 6>EF#32G32&GF#8E" : B$l 1 5 ) = "G8B8>E4&L1 6EDC#<BA8B8" 
350 C$ 1 1 5 ) = " L 1 6E< B >EGB AGF#L8EA8,AG " : D$ 1 1 5 ) = " E< ED >DCtt< A >DG " 

360 A$ ( 1 6 ) = " D32C#32< B8 >C# 1 6D8C# 1 6D 1 6D2 " : B$ (1 6 ) = " A4G 1 6F# 1 6G8F#2 ” 

370 C$( 1 6 ) = “F#4E8< A8A2" : D$( 1 6 ) = ” AGA< AQ8D2Q6” 

380 ASC 17)= ”D32C#32<B8 >C# 1 6D8C# 1 6D1 6D2 . " : B$ ( 1 7 ) = " A4G 1 6F# 1 6G8F#2 . " 

390 C$( 1 7 ) = "F#4E8< A8A2 . " : D$( 1 7 ) =" AGA< AQ8D2 . " 

400 OPEN "DATA.M-2" FOR OUTPUT AS #1 
410 FOR 1=0 TO 4 : GOSUB *PLAY : NEXT I 
420 FOR 1 = 1 TO 16: GOSUB *PLAY : NEXT I 
430 FOR 1=5 TO 15: GOSUB *PLAY : NEXT I 
440 FOR 1=17 TO 17:GOSUB *PLAY : NEXT I 
450 CLOSE: END 
460 »PLAY 

470 WRITE # 1 , A$ 1 1 ) , B$ 1 1 ) ■ D$ 1 I ) , C$ 1 1 ) : RETURN 
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10 • [GAVOTTE] 

20 ' Programed by D.Kobayashi In 1985 
30 'save "MUSIC3.M88" 

40 DIM A$( 62 ) . B$1 62 ) > C$1 62 ) , D$t 62 ) , E$( 62 ) . F$1 62 ) 

50 A$( 0 ) = "T1 40V09@2" : B$10 )="T1 40V09@2" :C$(0 )= "T1 40V09” 

60 D$1 0 )="T1 40V07@0" : E$( 0 ) = "T1 40V1 1 " :F$( 0 ) = "T1 40V1 1 " 

7 0 A$ ( 1 ) = " 04 A4L8 > AF# " : A$ ( 2 ) = " G2< A4 >GE " : A$ ( 3 ) = " F#2< A4 >EC# " : B$ 1 1 ) = " 04L8F#4 >F#D " : B$ 1 2 ) = “ E2< E4 >EC# " : B$ 1 3 ) = " D2< L4DE " 

80 A$( 4 ) = " D4C#< BABG4 " : A$ ( 5 ) = " F#4EDA4 >AF# “ : B$ ( 4 ) = " < A >DDC# " : B$ ( 5 ) = “ < A2 >F# >L8F#D" 

90 A$(6) = ''G2<A4>GE" : A$( 7 ) = " F# 2G#4BG# " : B$ ( 6 ) = "L8E2< E4 >EC# " : B$ ( 7 ) = " D2D4< B4 “ 

100 A$( 8 ) = " 05 A4G#F#EF#D4 " : A$ ( 9 ) = " C#4F#DE4DC# " : B$ ( 8 ) = " >L8E4DC(K B4G#4 ” : B$ ( 9 ) = " L4AAAA " 

110 A$( 1 0 ) = "<B>C#< A4E4G#4" : A$( 1 1 )="A2" :B$I 10 >="04L4F#F#EE" :B$( 1 1 )="E2" 

120 A$( 12) = "05L8E4< EG" : A$ ( 1 3 ) = " F#2 >D4< F#A " : B$ ( 1 2 ) = "04L8E4 >E4 “ : B$ ( 1 3 ) = “ E4< F#EF#4 >F#4 ” 

130 A$ 1 1 4 ) = " G2 >C#4< A# >C# “ : A$ 1 1 5 ) = " < B4 >C#DC#< B >G4 " : B$ 1 1 4 ) = " F#4< GF#L4GF# " : B$ 1 1 5 ) = " BA#BB " 

140 A$( 1 6 ) = "05L8G4F#4< F#4 >F#D" : A$ ( 1 7 ) = “ E2< F#4 >EC# " : B$ ( 1 6 ) = " 04B4 A#4D4 >D4 " : B$ ( 1 7 ) = " D4L8C#< B >C#4< A#4 " 

150 A$ C 1 8 ) = "05D4<B>DC#< A#B4 " : A$( 1 9 ) = " >F#4GF#EDC#D" : B$ ( 1 8 ) = "04B4L4DEF#8G8 " : B$ ( 1 9 ) = "F#BBA# " 

160 A$ ( 20 ) = "04B2B4L8 >BG " : A$ ( 2 1 ) = "05A2< B4 >AF# " : B$ ( 20 ) = " 04F#2G4 >D8< B8 " : B$ ( 2 1 ) = "05C2< F#4 >F#8D#8 " 

170 A$ 1 22 ) = " G2C#4GE " : A$ 1 23 ) = " F#4EDEC#D4 " : B$ ( 2 2 ) = " E2L404E >E " : B$ ( 23 ) = “ D< F#BB “ 

180 A$( 24 )= "C#404BA>A4<A>C" : A$(25)="<B2>G4<B>D" :B$( 24 )="A2A>A“ : B$125)="05G4<G8F#8L4GE" 

190 A$ ( 26 ) = "C#4EC#< A4 >GE“ : A$ ( 27 ) = " F#EDE< A4 >C#4 " : A$ 1 28 ) = " D2" : B$ 1 26 ) = " A205EC# " : B$ ( 27 ) = "D< BAA " : B$ ( 28 ) = " A2 " 

200 A$( 29)=”05L8DC#D4" : A$( 30 )="<F#EF#4AGA4“ : B$( 29 ) =A$< 29 ) : B$( 30 ) =A$( 30 ) 

210 A$ ( 3 1 ) = " D2O5DEF0D" : A$ ( 32 ) = " E4E4EF#GE " : B$ ( 3 1 ) = " D2A405D4 " : B$ ( 32 ) = " D4C#< B >C#DEC# " 

220 A$ ( 33 ) = "F#4D4DC#D4 “ : A$ ( 34 ) = ” < F#EF#4AGA4 “ : B$ ( 33 ) = “ D404A4 >DC#D4 " : B$ ( 34 ) = “ 04L8F#EF#4 AGA4 “ 

230 A$ ( 35 ) = " 04L8D2 >F#EDC# " : A$ ( 36 ) = “ <B4B4B >C#D< B" : B$ ( 35 ) = “ 04D2R2 “ : B$ ( 36 ) = " L8BAG#F#E4E4 " 

240 A$( 37 ) = "05E4<E4 >EDC#< B" : A$(38) = "A4A4AB >C#< A " : B$ C 37 1 = " EF#G#EA4<A4“ : B$ ( 38 ) = ” >AG#F#ED4D4 " 

250 A$(39)="O5D4<D4>DC#D4":A$(40)=“<L8G#F#G#4BAB4":B$<39)="O4L8DEF#D>DC#D4":B$(40)=”<G#F#G#4BAB4" 

260 A$( 41 ) = "05G#2<BAB>D" : A$( 42) = “C#<B>C#ED#C#D#F#" : B$( 41 ) = "05D2L4<G#Gtt" : B$( 42) = “AAAA" 

270 A$( 43 ) = ”05L8BAG#F#E4A4" : A$( 44 ) = "E4A4C#4<B>C#" : A$( 45 ) = "< A2“ : B$( 43 ) = "04B8>C#8L4DC#E" :B$( 44 ) = “C#< AAGH8A8" : — i 

280 A$ ( 46 ) = "04L8AGS A4 " : A$( 47 ) = "C#< B>C#4EDE4 " : B$ ( 46 ) = A$ ( 46 ) : B$ ( 47 ) = A$ ( 47 ) I 

290 A$(48)="03A2>>L4GF#" : A$( 49 ) ="F#E2D" : B$( 48 )="03A2>>L4ED" : B$( 49 ) ="DC#2<B” L -B$(45)="E2" 

300 A$ ( 50 ) = " 05D4C#4L8DC#DF# " : A$ ( 5 1) = ” F#EF#BBGA4 " : B$ ( 50 ) = " O4B4A04B2 " : B$ ( 5 1 ) = " B2 >C#2 " 

310 A$ ( 52 ) = " 05A2L8GFUEG " : A$ ( 53 ) = " F#4< B4 >C#4< A#4 " : B$ ( 52 ) = " 05D#2L4E< A# " : B$ ( 53 ) = " BDEC# " 

320 A$( 54)= "04L8B2F#EF#G" : A$( 55 )= "AGAB>C<B>CD“ :B$( 54)=“04L2DD" :B$(55)=”D1 " 

330 A$ ( 56 ) = " L805C< B >CF#C< B >CA" : A$ ( 57 ) = "< BAB >AGF#ED " : B$ ( 56 ) = " 04D2A4A4 " : B$ ( 57 ) = " A4G8F08E4 A4 “ 

340 A$(58)=”05C#4<A4>L8F#EDC#" : A$(59)="<B4B4B>C#D<B" :B$(58)="04L8AGF#ED4D4" :B$(59)="DEF#DG4G4" 

350 A$( 60 )="L805EDC#<BL4A>D“ : AS (61 )= "< A>D<F#E8F#8" : A$( 62 ) ="D2" : B$( 60 )= "04G2L4F#A" : B$< 61 )="F#DDC#8D8" : B$(62 )="<A2" 
360 CS ( 1 ) = " 04L4DD" :C$( 2) ="A2AA" :C$( 3)= "A2AC# " 

3 70 C$ ( 4 ) = " 04L4F#EF#E " : C$ ( 5 ) = " D2DD " 

380 C$( 6 ) = "04L4A2AA " : CS ( 7 ) = “A2BG# " 

390 C$ ( 8 ) = " 04L4EEEE " : C$ ( 9 ) = “ ED< A A " 

400 C$ (1 0 ) = " 04L4DDC#< B" :C$( 11)=" >C#2“ 

410 CSC 12) = "04L4C#< A " : C$ ( 1 3 ) = " AB8 >C#8D< B" 

420 CS ( 1 4 ) = " 03L4B2 >EE" : CS ( 1 5 ) = " DF#ED " 

430 C$ ( 1 6 ) = "04L4C#2< BB “ : C$ ( 1 7 ) = " BA#8 >C#8F#F# " 

440 C$( 18)="04L4F#GGF#8E8":C$( 19)="DC#C#F#“ 

450 C$( 20 )="04L4D2DG": C$121 )="ED#8E8F#D" 

460 C$ ( 2 2 ) = " 03B2L4 AA " : C$ ( 2 3 ) = " >ABEE " 

470 C$124 > = "04L4E2F#D" : C$( 25 ) = “D2<B>E" 

480 C$ 1 26 ) = "04L8E2E4A" : C$1 27 ) = " L8AGF#GE4E4 " : C$ ( 28 ) = ”F#2 " 

490 C$ 1 29 ) = "05L8DCHD4 " : C$ 1 30 ) = " < F#EF#4AGA4 " 

500 C$131 ) = "04L4DEF#D" : C$ 1 32 ) = "GEA< A" 

510 C$ 1 33 ) = "04L8D4F#4 >DC#D4 " : C$ 1 34 ) = "<F#EF#4AGA4 " 

520 C$ 1 35 ) = " 04L8DEF#EDC#< BA " : C$ 1 36 ) = " G#4 >BAG#F#ED " 

530 C$1 37 ) = "04L8C#DEDC#< BAG# " : C$ 1 38 ) = "F#4 >AG#F#EDC#" 

540 C$ 1 39 ) = "03L8B>C#D<B> >DC#D4 “ : C$ 1 40 ) = " < G#F#Gf 4BAB4 " 

550 C$ 1 4 1 ) = "04L4B2EE" : C$1 42 ) = "EEF#F#" 

560 C$1 43 ) = "04L4G#8A8B>C#< A" : C$1 44 ) = " AEEC#8D8" : C$1 45 )= "C#2" 

570 C$ 1 46 ) = "04L8AG#A4 " : C$ 1 47 ) = “C#< B>C#4EDE4 " 

580 C$ 1 48 ) = "03L8A2 >A#G#A#4 " : C$ 1 49 ) = " BA#B4EDE4 " 

590 C$1 50 ) = "04F#4<F#4 >F#2" : C$1 51 ) = "F#l " 

600 C$ 1 52 ) = "04L4F#2EC# " : C$ 1 53 ) = " D< GEF# " 

610 C$154 ) = "03L2BA” : C$1 55 ) = " AF#" 

620 C$ 1 56 ) = "03F#2L4 >F#D" : C$1 57 ) = "GEC#D" 

630 C$ 1 58 ) = "03A4L8B >C#DC#< BA " : C$ 1 59 ) = “L4G >DE< B" 

640 C$ 1 60 ) = "04L8C#< BAGA4F#4 " : C$ 1 6 1 ) = "D4A4A4GA " : C$ 1 62 ) = " F#2 " 

650 D$( 1 )="04D2" 

660 D$ 1 2 ) = "04L4DC#8< B8 >C#< A " 

670 D$ 1 3 ) = "04L4D< D8E8F#G8E8 " 

680 D$1 4 ) = "03L4F#GA< A" 
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690 D$ ( 5 1 = "03L4DF#8A8 >D2 " 

700 D$ ( 6 ) = ” 05L4DC#8< B8 >C#< A ” 

710 D$ ( 7 ) = " 04L4DC#< B >E " 

720 D$ ( 8 ) = "04L4C#< B8 A8G#E " 

730 D$ ( 9 ) = " 03L4ADC#F# " 

740 D$( 10)="O3L4D<B>E<E" 

750 D$(l 1 )="02A2" 

760 D$(12)=“02L4A>C#" 

770 D$( 1 3 ) = "03L4DC#<B>D" 

780 D$ ( 1 4 ) * '' 03L4EDEF# " 

790 D$ ( 1 5 ) = " O3L4GF0GE " 

800 D$( 16)= "03L4F#G#8A#8BA" 

810 D$( 17) = "03L4G#>C#<AttF#“ 

820 D$ ( 1 8 ) = " 03L4BGED8CH8 " 

830 D$(19)="03L4DEF#<F#" 

840 D$ ( 20 ) = " 02L4B >A8F#8G2 " 

850 D$(21 )="03L4GF#8E8D#<B" 

860 D$ ( 22 ) = " 03L4EF#8G8AC# " 

870 D$ ( 23 ) = "03L4D< BGG# “ 

880 D$ ( 24 ) = “02L4AB8 >C#8D8E8F# “ 

890 D$( 25 ) = “03L4F#E8D8E8F#8G" 

900 D$(26)="03L4GEC#<A" 

910 D$ ( 27 ) = "03L4DGA< A " 

920 D$(28)=“03D2" 

930 D$ ( 29 ) s " 04L8DC#D4 " 

940 D$ ( 30 ) = "03L8F#EF#4AGA4 " 

950 D$(31 )="03D2R2" 

960 D$ ( 33 ) = ”04L8R2DC#D4 " 

970 D$(34)="03L8F#EF#4AGA4" 

980 D$(35)=“03D2" 

990 D$ ( 39 ) = " O4L8R2DC0D4 " 

1000 D$ ( 40 ) = "03L8G#F#G#4BAB4 " 

1010 D$( 41 )= “03E1 “ 

1020 D$( 42 ) =D$( 4 1 ) 

1030 D$ ( 4 3 ) = "03L8E2 AG# A4 “ 

1040 D$( 44 ) = "03L8C#<B>C#4EDE4" 

1050 D$(45)="02A2" 

1060 D$( 46 ) = "03L8AG#A4" 

1070 D$ ( 47 ) = " 03L8C#< B>C#4EDE4” 

1080 D$(48)="02A2R2" 

1090 D$(50)="O4R2BA#B4" 

1100 D$ ( 5 1 ) = "03L8DC#D4F#EF#4 ” 

1110 D$(52)="02B2R2" 

1120 D$(54)="03L8R2DC#D4" 

1130 D$( 55 ) = " 02F#EF#4AGA4 " 

1140 D$(56)="02D2R2" 

1150 D$( 60 ) = "03L8R2>DC#D4" 

1160 D$ ( 6 1 ) = "02L8F#EF#4AGA4 " 

1170 D$(62)="02D2" 

1180 E$( 1 ) = "04A4L8>AF#" : E$( 2 ) = “G2< A4 >GE" : E$( 3 ) = "F#2" 

1190 E$ C 5 ) = " R204A4L8 >AF# " 

1200 E$ ( 6 ) = " 05L8G2< A4 >GE " : E$ ( 7 ) = " F#2R2 “ 

1210 E$( 1 6 ) = "04R2L8F#4 >F#D " :E$( 17)="E2<F#4EF# ” 

1220 E$ ( 22 ) = " 04L8R2G4 >GE“ :E$(23) = " F#4EDEF#EF# " 

1230 E$( 24)= ”05E4<A4R2" 

1240 E$ ( 26 ) = "04R2A4 >L8GE“ : E$ ( 27 ) = " FHEDEE4 . D“ : E$( 28 ) = “D2 " 
1250 E$ ( 29 ) = “05L4D&D " : E$ ( 30 ) = " < F#&F#A&A " 

1260 E$(31)="04D2R2" 

1270 E$ ( 33 ) = ” 05L4R2DD” : E$ ( 34 ) = " < F#&F#A&A " 

1280 E$(35)="04D2R2" 

1290 E$ ( 39 ) = "05L8R2D4 . < A" : E$ ( 40 ) = “ >D4 . EDEDE" 

1300 E$ ( 4 1 ) = " 05D2R2 “ 

1310 E$ ( 43 ) = “05L4R2E&E" : E$ ( 44 ) = " A&AE&E" : E$ ( 45 ) = "< A2" 

1320 E$ ( 46 ) = "05L8E4 . A “ : E$ ( 47 ) = “E4 . F#EF#EF#" 

1330 E$(48)=“05E2R2" 

1340 E$ ( 50 ) * "05L8R2F#4 . B" : E$( 5 1 ) = "F#4 . GF#GF#G " 

1350 E$ ( 52 ) = " 05FS2R2 " 

1360 E$ ( 54 ) = " 04L4R2 A >D " : E$ ( 55 ) = " DF#F#A " 

1370 E$C56)="05A2R2" 

1380 E$ ( 60 ) = "05R2L4D&D" : E$ ( 6 1 ) = " < F#&F#A&A " : E$ C 62 ) = " D2 " 
1390 F$( 1 )="04F#4>F#8D8" 

1400 F$( 2 ) = "F#8E4 . < A4 >E8< A8 " 

1410 F$(3)=”A2R2" 

1420 F$( 5 ) = "R2F#4 >F#8D8" 

1430 F$(6)="E2<A4>E8<A8" 

1440 F$(7) = ''A2R2” 

1450 F$ ( 22 ) = " >R2E4E4 " 

1460 F$ ( 23 ) = " D4R4B4R4 " 

1470 F$( 24 ) = “A2R2" 

1480 F$( 26 ) = "R2E4E4 " 

1490 F$( 27 ) = "D4D4< A8F08A4 " 

1500 F$( 28 ) = "F#2“ 

1510 F$( 29 ) =E$( 29 ) 

1520 F$( 30 ) =E$( 30 ) 

1530 F$(31 J =E$ (31 ) 

1540 F$( 33 ) =E$( 29 ) 

1550 F$( 34 ) =E$( 34) 

1560 F$( 35 ) =E$( 35 ) 

1570 F$( 43 ) =E$( 43 ) 

1580 F$( 44 ) =E$( 44 ) 

1590 F$(45)=E$(45) 

1600 F$( 54 ) =E$( 54 ) 

1610 F$(55)=E$(55) 
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1620 F$(56)=”05F#2R2" 

1630 F$(60)=E$(60) 

1640 F$(61 )=E$(61 ) 

1650 F$(62)=E$(62) 

1660 OPEN "DATA. M- 3" FOR OUTPUT AS #1 
1670 FOR 1=0 TO 1 1 : GOSUB »PLAY:NEXT I 
1680 FOR 1=1 TO 28: GOSUB *PLAY : NEXT I 
1690 FOR 1=12 TO 45: GOSUB *PLAY : NEXT I 
1700 FOR 1=29 TO 62:GOSUB *PLAY : NEXT I 
1710 FOR 1=46 TO 62: GOSUB *PLAY : NEXT I 
1720 FOR 1=1 TO 28: GOSUB #PLAY : NEXT I 
1730 CLOSE: END 
1740 *PLAY 

1750 WRITE # 1 , A$ ( I ) . B$ ( I ) , C$ ( I ) , D$ ( 1 ) . E$ ( I ) . F$ ( I ) : RETURN 
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1 0 1 CBOURREE3 

20 ' Programed by D.Kobayashl in 1985 
30 'save "MUSIC4.M88" 

40 DIM A$(34),B$(34).C$(34),D$(34),E$(34).F$C34) 

50 A$( 0 )= "T180Q8O4V1 2“ : B$(0 ) = "T1 80Q8O4V12" :C$(0 1 = "T180Q8O4V1 092" 

60 D$ ( 0 ) = " T 1 80Q8O4V 1 002 " : E$ ( 0 ) = "T 1 80Q8O3V09 " : F$ ( 0 ) = ”T 1 80Q8O2V08»0 " 
70 A$( 1 )="R4" 

80 A$ ( 2 ) > " 04R4 A4 >D4R4 “ 

90 A$(31=A$(2) 

100 A$ ( 4 ) = "04R4 >F#8E8F#4G#4 “ 

110 A$ ( 5 ) = "05A8G#8A8B8 A8R4 " 

120 A$ ( 6 ) = "O5R4F04B4R4 " 

130 A$(7)=A$(6) 

140 A$ ( 8 ) = " 05R4 A4C#8B8 A8G#8 " 

150 A$(9)="05A2. " 

160 A$( 1 0 ) = "05R4" 

170 A$C 1 1 )=“05R4E4A4R4” 

180 A$( 12)=A$( 1 1 ) 

190 A$( 13)="05R4D4G4F#8E8" 

200 A$( 14)="05F#8G8F#8E8D4R4" 

210 A$(23)=A$( 1 ) 

220 A$(24)=A$( 1 ) 

230 A$ ( 25 ) = " O5R4L8F0GABAB " 

240 A$( 26 ) = "05L8GABAG4R4" 

250 A$(31 ) = "05R4F#4B4R4 " 

260 A$ ( 32 ) = " 05R4B4 >D4R4 " 

270 A$ ( 33 ) = " 05R4L8 AGF#GAG " 

280 A$(34)="05F#2. " 

290 B$( 1 )="o4r4" 

300 B$ ( 2 ) = " 04R4L4F# AR4 " 

310 B$( 3 ) =B$( 2 ) 

320 B$ ( 4 ) = " 04R4 >D8C#8D4D4 “ 

330 B$( 5 ) = "05E4< A8A8A4R4" 

340 B$( 6 ) = "05R4D4F#4R4 " 

350 B$ ( 7 1 = "05R4E4E4R4 " 

360 B$( 8 1 = "05R4F#4F#4E4" 

370 B$(9)=“05E2. " 

380 B$( 1 0 ) = "R4" 

390 B$ ( 1 1 ) = "04R4A4 >E4R4 " 

400 B$( 12)=B$( 1 1 ) 

410 B$( 13)="05R4F#4E4E4" 

420 B$( 14)= "05D4D8D8< A4R4" 

430 B$ ( 23 ) = "O5R4F04D4R4 " 

440 B$(24)="05R4F#4A4R4" 

450 B$(25)="05R4L8DEF#GF#E" 

460 B$ ( 26 ) = " 05D4R4R2 " 

470 B$ ( 3 1 ) = " O5R4L4DF0R4 " 

480 B$ ( 32 ) = "05R4L4EBR4 " 

490 B$ ( 33 ) = " 05R4F#8E8D4E4 " 

500 B$(34)="05D2. " 

510 C$C 1 )="04F#8G8” 

520 C$ ( 2 ) = "04L4 A >D< AG “ 

530 C$(3)="04L4F#>D<F#E" 

540 C$(4)="04D4F#8E8F#4G#4" 

550 C$ ( 5 ) = " 04L8 AG# ABAGFtE " 

560 C$(6)=“04L4F#>G#<BA" 

570 C$( 7 1 = "04L4G#>BED" 

580 C$( 8 ) = " 05L8C#< B >C#DC#< B AG# " 

590 C$(9)=”04A2. " 

600 C$( 10)="O5C#8D8" 

610 C$( 1 1 )="05L4EAED" 

620 C$ ( 1 2 ) = " 05L4C#AC#< B " 

630 C$( 13)="04L4A>DGF#8E8” 

640 C$(14)="05L8F#GF#EDEF#D" 

650 C$( 15)="04B8>F#8G2F#4" 

660 C$( 16)="04G8>D#8E2F#4" 

670 C$117) =C$( 1 5 ) 

680 C$1 18)="04E8>D#8E2<A#8B8" 

690 C$1 1 9)="05L4C#EGF#" 

700 C$1 20 ) = "04L4F# >C#ED" 

710 C$1 21 ) = "05B4F#8E8D4C#4 " 

720 C$ ( 22 ) = "04B2 . F#8G8 " 

730 C$ ( 2 3 ) = " 04L4 A >D< F#E ” 

740 C$1 24 )="04L4D>AC<B“ 



750 C$ 1 25 ) = "05C4F#8G8A4C4 " 

760 C$ ( 26 ) = “ 04L8BAGAB >DC#E “ 

770 C$ ( 27 ) = "05L8DC#< B >C#DF#EG " 
780 C$1 28 ) = "05L8F#EDEF#AGB" 

790 C$( 29 ) = "05A4G#8A8B4D4 " 

800 C$1 30 ) = " 05L8C#DC#< BAB >C#< A “ 
810 C$131 )="04F#8>C#8D2F#4" 

820 C$ 1 32 ) = " 05B8C#8D2C#8< B8 “ 

830 C$ 1 33 ) = "05C#8< A8 >A4D4E8C#8 " 
840 C$(34)="05D2. " 

850 D$l 1 )=“04L8DE" 

860 D$(2)="04L4F#AF#C# " 

870 D$( 3 ) = ”04L4DF#D<A#" 

880 D$ 1 4 ) = " 03B4 >D8C#8< B4 >E4 “ 

890 D$ 1 5 ) = " 04L4EC#< A >C# " 

900 D$( 6 )= "04D4B8A8B4D4" 

910 D$ 1 7 ) = "04E4 >E8D8E4< G#4 " 

920 D$ 1 8 1 = "04L4EAF#E" 

930 D$19)=“04E2. " 

940 D$1 1 0 ) = "04L8AB" 

950 D$1 1 1 )="05L4C#EC#<G#" 

960 D$(12)="04L4A>C#<AE“ 

970 D$( 13)="04L4F#ABA“ 

980 D$ 1 1 4 ) = "04A2A4A4 " 

990 D$ 1 1 5 ) = " 04B8 >D#8E2< B4 ” 

1000 D$ 1 1 6 ) = "04B8F#8G2D#4 " 

1010 D$ 1 1 7 ) = " 04E8 >D#8E2D#4 " 

1020 D$( 18)="05E4<A#8B8A4>C#4" 
1030 D$ 1 1 9 ) = " 04FH4 >C#4E4< F#8G#8 " 
1040 D$ 1 20 ) = ” 04L4A#F# >C#< B " 

1050 D$ 1 2 1 ) = "04B4 >D8C#8< B4AH4 " 
1060 D$ 1 22 ) = "O4F02 . D8E8 " 

1070 D$ 1 23 ) = "04L4FHDAB " 

1080 D$( 24 ) = "05L4C<DAG" 

1090 D$(25)="04F#4>C8<B8A4F#4" 
1100 D$(26)="04L4GDGG" 

1110 D$1 27 ) = "04L4F#D>D< A" 

1120 D$( 28 ) = "04L4AFttA>C#" 

1130 D$ 1 29 ) = " 05D8E8D8C#8<B4G#4 " 
1140 D$1 30 ) = "O4L4AEF0G" 

1150 D$ ( 3 1 ) = “04A8E8F#2B8A8 " 

1160 D$( 32 ) = “04G#8A8B2G#4 " 

1170 D$ ( 3 3 ) = " 04L4 AA A A " 

1180 D$(34)=“04A2. " 

1190 E$( 1 )="R4" 

1200 E$ ( 2 ) = "04R4F#8E8F#4R4 " 

1210 E$ ( 3 ) = "04R4A8G8A4R4 " 

1220 E$ ( 4 ) = " 04R4D8E8D4D4 " 

1230 E$ ( 5 ) = " 04L4C#ED< A " 

1240 E$(6)=“03A4>F#8E8F#4R4" 

1250 E$( 7 ) = "04R4B8A8B4<B4" 

1260 E$ ( 8 ) = " 03L4E >C#D< B " 

1270 E$( 9 ) = "04C#2 . " 

1280 E$( 1 0 ) = "R4" 

1290 E$( 1 1 )="05R4C#8<B8>C#4R4” 
1300 E$ ( 1 2 ) = " 04R4E8D8E4R4 " 

1310 E$ ( 1 3 ) = " 04L4R4DDC# " 

1320 E$( 14)="04D4D8E8F#4R4" 

1330 E$( 1 5 ) = "04R4E8D#8E4R4" 

1340 E$< 16) =E$ ( 15) 

1350 E$(17)="04R4E8D#8E4F#4" 

1360 E$( 18)="03B4>E8D8E4R4" 

1370 E$ ( 1 9 ) = " 04R4C#8< B8 >C#4R4 " 
1380 E$( 20 ) = "04R4A#8G#8A#4B4 " 
1390 E$ C 2 1 ) = "04L4F#BF#E" 

1400 E$(22)="04D4D8C#8D4R4" 

1410 E$ ( 23 ) = "03R4 A8B8 >C4R4 " 

1420 E$( 24 ) = "04R4FH8G8A4R4 " 

1430 E$(25)="04L4R4ADD" 

1440 E$(26)=”04L4D<B>EE” 

1450 E$ ( 27 ) = " 04L4DF#F#A " 

1460 E$( 28 > = "04L4D< A>DG" 

1470 E$( 29 ) = “04L4F#DDE" 

1480 E$( 30 ) = "04L4E<A>DE" 

1490 E$(31)="04F#4D8C#8D4R4" 

1500 E$( 32 ) = "04R4E8D8E4E4 " 

1510 E$ ( 33 ) = "04E4D8E8F#4E4 " 

1520 E$( 34 ) = “04F#2 . " 

1530 F$( 1 )="R4" 

1540 F$( 2 ) = "03R4D8Ctt8D4R4 " 

1550 F$ ( 3 ) = " 03R4C#8< B8 >C#4R4 “ 
1560 F$ ( 4 ) = " 02R4B8 >C#8D4< B4 " 

1570 F$ ( 5 ) = " 03L4C#< AF#A " 

1580 F$ ( 6 ) = "02D4 >D8C#8D4R4 " 

1590 F$(7)="02R4G#8F#8G#4E4" 

1600 F$(8)="02L4AF#DE" 

1610 F$(9)="01A2. " 

1620 F$( 10)=“O2R4" 

1630 F$( 1 1 )="02R4A8G#8A4R4“ 

1640 F$(12)=“02R4G8F#8G4R4” 

1650 F$( 1 3 ) ="02L4R4F#EA " 

1660 F$ ( 1 4 ) = "02D4B8 A8B4D4 " 

1670 F$ ( 1 5 ) = " 02L4GBED ” 

1680 F$( 16)=”02L4C>C<GF# " 
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1690 F$ ( 1 7 ) = " 02L4E >E< BA “ 

1700 F$( 18)="02G4C#8<B8>C#4R4" 

1710 F$ ( 1 9 ) = "02R4A#8G#8A#4R4 " 

1720 F$ ( 20 ) = “02R4F#8E8F#4G4 " 

1730 F$(21 ) = "02D8C#8D8E8F#4<F#4" 

1740 F$ ( 22 ) = " 01 B4 >B8 A#8B4R4 " 

1750 F$(23)="02R4F#8G8A4R4" 

1760 F$ ( 24 ) = " 02R4D8E8F#4R4 ” 

1770 F$ ( 25 ) = "02R4 A8G8F44D4 " 

1780 F$ ( 26 ) = "0 1 G4 >G8F#8G4< A4 " 

1790 F$ ( 27 ) = "01 B4 >B8 A8B4C44 " 

1800 F$ ( 28 ) = "02D4 >D8C#8D4<E4 * 

1810 F$ ( 29 ) = "02F#4B4A8G#8F#8E8 " 

1820 F$ ( 30 ) = "02L4 AGF#E ” 

1830 F$ ( 3 1 ) = "02D4B8A8B4R4 " 

1840 F$ ( 32 ) = " 02R4G#8F#8G#4E4 " 

1850 F$( 33 ) = "02A8G8F#8G8A4< A4" 

1860 F$( 34 ) = "02D2 . " 

1870 OPEN “DATA.M-4" FOR OUTPUT AS #1 
1880 FOR 1=0 TO 9 : GOSUB *PLAY : NEXT I 
1890 FOR 1=1 TO 34: GOSUB »PLAY : NEXT I 
1900 FOR 1=10 TO 34: GOSUB *PLAY : NEXT I 
1910 CLOSE: END 
1920 *PLAY 

1930 WRITE # 1 , C$ ( 1 ) , D$ ( I ) , E$ ( I ) , F$ ( 1 ) , A$ ( I ) , B$ ( I ) : RETURN 



U7.M0 

10 ' [ GIGUE ] 

20 1 Programed by D.Kobayashi in 1985 
30 'save "MUSIC5.M88" 

40 DIM A$(74),B$<74), C$174), D$(74),E$(74),F$<74) 

50 A$(0 )="T1 50O4V09Q8S2" : B$( 0 )="T150O4V09Q8®2" :C$< 0 ) = "T150O4V09Q8" 
60 D$ 1 0 ) = “T 1 50O3V08Q8@0 " : E$( 0 ) = "T 1 5004V 1 1 Q8 " : F$ 1 0 ) = "T 1 50O4V1 1 Q8 " 

70 A$( 1 )="04D8" 

80 A$(2)="04L4A.B. " 

90 A$ 1 3 ) = "04L8A4 . &AB>C#" 

100 A$ ( 4 ) = " 05L8DC#< BABG " 

110 A$(5)="04L8F#EF#DF#A” 

120 A$(6)="05L4D.F#." 

130 A$( 7 ) = "05L4E . &ED8 " 

140 A$(8)="05L8C#<BAB>C#D" 

150 A$ 1 9 ) = " 05L8C#< B >C#< A >C#E “ 

160 A$ ( 1 0 ) = ” 05L8 AGAAGA " 

170 A$(11)=“05L8AGA<B>D#F#" 

180 A$(12)="05L8GF#GGF#G" 

190 A$( 13)="05L8GF#G<A>C#E" 

200 A$(14)="05L8F#G#AAG#A" 

210 A$( 1 5 ) = "05L8DEF#F#EF#" 

220 A$(16)="04L8B>C#DDC#D" 

230 A$( 17)="04L8G#ABEG#B" 

240 A$(18)="05L8EDC#DC#<B" 

250 A$( 1 9 ) = "04L8A4>F#< A4 >F#" 

260 A$(20)="O4L8G#4>E<G4>E“ 

270 A$(21 )=“04L8F#4>D<F4>D" 

280 A$(22 ) ="04L8E4. &EG#B" 

290 A$(23 ) = "05L8DG#BDC#<B" 

300 A$( 24 ) = "05L8C#1 6D1 6E<AEAG#" 

310 A$( 25 ) = "04L4A . &A ” 

320 A$( 26 ) = "04A8" 

330 A$ ( 27 ) = " 05L4E . F# . " 

340 A$(28)="05L8E4. &EF#G" 

350 A$ ( 29 ) = " 05L8F#EDC#D< B " 

360 A$ ( 30 ) = "04L8A#B>C#< F#A#>C#" 

370 A$(31 ) = "05L4F#. G. " 

380 A$ ( 32 ) = " 05L8G32FS4&F# 1 6 . F#ED " 

390 A$(33)="05L8C#D<BF#BA#" 

400 A$(34 )=“04L8B4. &B>DC#“ 

410 A$ ( 35 ) = " 05L8DC#DDCf D " 

420 A$(36)="05L8DC#D<EG#B" 

430 A$( 37 ) = "05L8EDC#<B>C#D“ 

440 A$ ( 38 ) = " 05L8C#< B >C#< A >C#E " 

450 A$ 1 3 9 ) = ” 05L8GF#GGF#G “ 

460 A$ ( 4 0 ) = " 05L8GF#G< A >C#E " 

470 A$(41 ) = ”05L8AGF#EF#G" 

480 A$( 42 ) = "05L8F#EF#DF#E" 

490 A$ ( 43 ) = " 05L8F#G#AGAB " 

500 A$(44 )= "05L8C#4 . &C#GB" 

510 A$( 45 ) = ”05L8AG#F#EDC#" 

520 A$ 1 46 ) = “04L8B4 . &B>F#A" 

530 A$(47)="05L8G#F#E#F#ED" 

540 A$< 48 ) = "05L8C#F#EDC#<B" 

550 A$l 49 ) = "04L8AG#F#BAG#" 

560 A$(50)="O4L4F#.8F#D8" 

570 A$(51 ) = "04L4A . B. " 

580 A$ 1 52 ) = "05L8C4 . &C< BA " 

590 A$ ( 53 ) = "04L8B>DG< A >GF#" 

600 A$ 1 5 4 ) = " 05L8GBAB4 . & " 

610 A$( 55 ) = "05L8BAGF#GE“ 

620 A$(56 )= "05L8F#AGA4 . &" 

630 A$ 1 57 ) = " 05L8AGF#EF#D# " 



640 A$ 1 58 ) = " 05L8EGF#G4 . & " 
650 A$ ( 59 ) = " 05L8GF#EDEC# " 
660 A$(60)="O5L8DF#EF#GA" 
670 A$(61 )="04L8B>C#DEF#D" 
680 A$(62)="05L8C#DEF#GE" 
690 A$( 63 ) = "05L8DEF#GAF#" 
700 A$ ( 64 ) = " 05L8EF#GABG " 

710 A$(65)=“05L8F#4.&F#ED" 
720 A$ ( 66 ) = " 05L8EC#D< A >DC# " 
730 A$( 67 ) = "04L4D>D8A 
740 A$( 68 ) = "05L8ABAG#EF#" 
750 A$ ( 69 ) = " 05L8GAGF#DE " 

760 A$(70 )="05L8FGFEC#D" 

770 A$( 71 )="05L8C#DE< A4. &" 
780 A$ 1 72 ) = " 04L4A >A8B >C#8 “ 
790 A$( 73 ) = ”06L8D4< AF#ED" 
800 A$( 74) = "05L4D. &D" 

810 B$l 1 )="04D8" 

820 B$(2)="04L4F#.G. “ 

830 B$ ( 3 ) = " 04L4F# . &F#G8 " 

840 B$ ( 4 ) = "04L4AG8F#E8 " 

850 B$ ( 5 ) = " 04L8DC#D< A >DE" 
860 B$( 6 ) = "04L4F# . B. " 

870 B$ 1 7 ) = " 04L4B . &BB8 " 

880 B$ 1 8 ) = "04L4AA8AG8" 

890 B$( 9 ) = "04L8AG#AEAB“ 

900 B$ ( 1 0 ) = " 05L4C#R8C#R8 " 
910 B$ ( 1 1 ) = "04L4B . R4B8 " 

920 B$( 12)="04L4BR8BR8" 



930 B$(13: 
940 B$(14)= 
950 B$ ( 1 5 ) = 
960 B$ ( 1 6 ) = 
970 B$ 1 1 7 ) = 
980 B$ 1 1 8 ) = 
990 B$ ( 1 9 ) = 
1000 B$( 20 ) 
1010 B$ ( 2 1 ) 
1020 B$(22) 
1030 B$(23) 
1040 B$( 24 ) 
1050 B$(25) 
1060 B$(26) 
1070 B$( 27) 
1080 B$( 28 ) 
1090 B$( 29 ) 
1100 B$( 30 ) 
1110 B$( 31 ) 
1120 B((32) 
1130 B$( 33 ) 
1140 B$( 34 ) 
1150 B$(35) 
1160 B$( 36 ) 
1170 B$(37) 
1180 B$( 38 ) 
1190 B$( 39 ) 
1200 B$ ( 40 ) 
1210 B$(41 ) 
1220 B$( 42) 
1230 B$(43) 
1240 B$( 44 ) 
1250 B$(45) 
1260 B$( 46 ) 
1270 B$( 47 ) 
1280 B$( 48 ) 
1290 B$( 49 ) 
1300 B$( 50 )= 
1310 B$( 51 
1320 B$( 52 
1330 B$( 53 
1340 B$( 54 
1350 B$(55) 



04L4A.R4>C#8" 
05L4DF#8E<A8" 
04L4B>D8DD8“ 
05L4D<B8A>D8" 
05L4E< E8G#G#8 " 
04L4AA8AG48" 
04F#2. " 

“04E2. ” 

"04D2.&" 
"04L8D4.&DEG# " 
"04L4BG#8AB8" 
"04L4AE8EE8" 
"04E4.&E4" 

"05C#8" 

"05C#4.D4. " 

”05C#4 . &CD8D8E8 * 
"05D4< F#8E4E8 " 
"04L8F#4 . &F#>F#E” 
"05L4D.E. " 

” 05L4D . &D< F#8 " 
"04L4EE8F#F#8 ” 
"04L4F#.8F#F8" 
”04L4BR8GltR8 " 
"04L4G#R8BB8" 
"04L4BA8AGD8" 

" 04L8 AG# AEA >C# " 
"05L4ER8C#R8" 

" O5L4C0R8EE8 " 

" 05L4ED8DC#8 " 

" 05L8DC#D< A >DC# " 
"05L8D4 . &DC#D" 
"04L4E#. &E#>C#8“ 
"05L8C#4 . &C#<BA" 
"04L4B.&BA8" 
"05L4DC#8< BB8 " 

" 04L8A4 >C#8< BAG# " 
"04L4F#F#8F#E#8" 
"04L4C*. &C#D8" 
"04L4F#.G. " 
'04L8F#4 . &F#GA " 
■04L4GB8AA8" 

' 04L8B >DCD4< B " 
'05L4ED8C#. &" 

360 B$( 56 ) = "05L8C#F#ED#4E" 
1370 B$( 57 ) = "05L4D#F#8<B. 8" 
1380 B$( 58 ) = "04L8B4BB>ED" 

1390 B$( 59 ) = "05L4C#E8< A . &” 
1400 B$ ( 60 ) = " 04L4 AA8AA8 " 

1410 B$( 61 ) = “04L4GR8BR8" 

1420 B$(62)="04L4AR8>C#R8" 
1430 B$( 63 ) = "04L4BR8>DR8" 

1440 B$( 64 ) = "05L4ER8ER8" 

1450 B$( 65 ) = "05L8DC#D<B4B" 
1460 B$ ( 66 ) = " 05L4C#< A8BA6 " 
1470 B$ ( 67 ) = "04FH4 . R4 >C8 " 

1480 B$( 68 ) = "04B2 . " 

1490 B$(69)=”04A2. " 

1500 B$( 70 ) = "04G2 . &" 

1510 B$(71 ) = "04L8G4 . &GF#>C#" 
1520 B$( 72 ) = "05L4EC#8DE8" 

1530 B$(73)="05L8D4F#DC#D" 
1540 B$ C 74 ) = "04L4A . &A " 

1550 C$( 1 ) = "04D8" 

1560 C$ ( 2 ) = "04L4D . D . ” 

1570 C$ ( 3 ) = “ 04L4D . &D< G8 " 
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1580 C$ ( 4 ) = " 04L4DD8DC# 8 “ 

1590 C$ ( 5 ) = “ 03L8 AGAFf A >C#" 

1600 C$(6)=“04L4D.D. " 

1610 C$ ( 7 ) = “04L4E . &EE8 “ 

1620 C$(8)="04L8E4C#F#4E" 

1630 C$ ( 9 ) = " 04L8EDEC#EG " 

1640 C$( 1 0 ) = "04L4C#R8F#R8“ 

1650 C$(11)="04F#4.R4D#8" 

1660 C$ ( 1 2 ) = "04L4ER8ER8 " 

1670 C$( 13)="04E4.R4A8" 

1680 C$( 14)=“04L4A4D8E4E8" 

1690 C$( 1 5 ) = "04L4F#<B8BB8" 

1700 C$( 16)="04L4EE8F#F#8" 

1710 C$(17)=“03L4B>G#8BD8" 

1720 C$ ( 1 8 ) = ”04L4C#E8ED8 " 

1730 C$ ( 1 9 ) = " 04C#4 . < B4 . & " 

1740 C$( 20 )="03B4 . A4 . &" 

1750 C$(21 )="03A4.L8G#BA” 

1760 C$C22) = “03L8B >C#D< G#B >D “ 
1770 C$ ( 23 ) = "04L4G#E8< A >E8 " 

1780 C$(24)="04L4EC#8<BB8" 

1790 C$ ( 25 ) = " 04L4C# . &C# " 

1800 C$(26)="04E8" 

1810 C$C27)="04L4A. A. “ 

1820 C$( 28 )="04A. &AC#8" 

1830 C$ ( 29 ) = "03L4 AB8GB8 " 

1840 C$( 30 )="04L8C#4<A#B>C#<A#" 
1850 C$ ( 3 1 ) = “03L4B . >B . " 

1860 C$( 32 ) = "04L4B. &B<B8" 

1870 C$( 33 ) = "03L4GB8 >C#C#8" 

1880 C$( 34 )="04L4D. &DF#8" 

1890 C$ ( 35 ) = "04L4ER8ER8 " 

1900 C$ ( 36 ) = “ 03L4BR8 >EE8 " 

1910 C$(37)="04L4EF#8F#E8" 

1920 C$ ( 38 ) = “04L.8EDEC#EA " 

1930 C$(39)="04L4AR8AR8" 

1940 C$140 ) = "04LER8AA8" 

1950 C$(41 )="04L4AB8BA8" 

1960 C$ ( 42 ) = " 04L8 AGAF#DA " 

1970 C$ ( 43 ) = "04L8AG#F#B4A" 

1980 C$ ( 44 ) = "04L4G# . &G#E#8 " 

1990 C$ ( 45 ) = " 04L8F#G#A< A4 >C#" 
2000 C$( 46 )= "04L4F#. &F#>C#8" 
2010 C$( 47 )="04L8BAG#F#4E#” 

2020 C$(48)="04L4F#.&F#G#8" 

2030 C$ ( 49 ) = " 04L4C#D8< G# >C#8 " 
2040 C$( 50 ) = “03L4A . &AA8 " 

2050 C$ ( 5 1 ) = " 04L4D . D . " 

2060 C$( 52 ) = "03L4A . &A>D8 " 

2070 C$( 53 )= "04L4DE8E4D8" 

2080 C$( 54) = "04L4D. &D8G8FH8" 
2090 C$ ( 55 ) = “04L4BB8AG8 " 

2100 C$( 56 ) = “04L4F# >C8< AE8 " 

2110 C$( 57 ) = “04L4F#A8GF#8” 

2120 C$( 58) = "04L4E<B8>B4F#8" 
2130 C$ ( 59 ) = " 04L4EG8F#E8 " 

2140 C$ ( 60 ) = " 04L4D< A8 >DD8 “ 

2150 C$ ( 6 1 ) = “04L4DR8ER8 " 

2160 C$< 62 ) = ”04L4ER8F#R8 " 

2170 C$( 63 ) = "04L4F#R8DR8 " 

2180 C$ ( 64 ) = " 04L4 AR8AR8 " 

2190 C$< 65 ) = “04L4A8G8A8GF#8" 
2200 C$(66)="04L4EF#8EE8" 

2210 C$( 67 ) = "04L4D. R4F#8" 

2220 C$ < 68 ) = " 04L4F# . E . & " 

2230 C$ ( 69 ) = "04L4E . D . & " 

2240 C$( 70 ) = "04L4D. C#8E8D8" 

2250 C$(71 )="04L8EF#GC#EG" 

2260 C$ ( 72 ) = " 05L4C#< A8DG8 " 

2270 C$ ( 73 ) = " 04L4 A >D8< A8G8F#8 " 
2280 C$ ( 74 ) = "04L4F# . &F# " 

2290 D$( 1 )="02D8" 

2300 D$ ( 2 ) = " 03L8DC#DDC#D " 

2310 D$(3)="03L8DC#D<D4E" 

2320 D$( 4 ) = "03L8F#4GA4< A“ 

2330 D$(5 )="03L8D4. 8D4C4t" 

2340 D$(6)="02L8BABAG#A" 

2350 D$<7)=”02L8G#F#G#EF#G#" 
2360 D$(8)="02L8A4>F#D4E" 

2370 D$( 9)=”02L8A4. &A4G" 

2380 D$( 10)="O2L8F#4>GF#4E" 

2390 D$( 1 1 ) = "03L8D#4F#D#4<B" 
2400 D$( 12)="03L8E4F#E4D“ 

2410 D$( 1 3 ) = “03L8C#4EC#4< A" 

2420 D$( 1 4 ) = "03L8D4 >DC#4<C#" 
2430 D$( 15)=“02L8B4>BA4<A" 

2440 D$( 16)="02L8G#4>G#F#4<F#" 
2450 D$(17)="02L8E4>EDC#<B" 

2460 D$ ( 1 8 ) = " 03L8C1K BA >E4 . & “ 
2470 D$( 1 9 ) = "03L8EF#ED#<B>C#" 
2480 D$( 20 ) = "03L8DEDC#< AB" 

2490 D$(21)="03L8CDC<BG#A" 

2500 D$ ( 22 ) = “ 02L8G# ABE4 . & " 

2510 D$ ( 23 ) = "02L8E4 >EF#4G# " 



2520 D$(24)="03L8A4C#E4<E" 

2530 D$(25) = "02A48.A4. “ 

2540 D$(26)=“02A8" 

2550 D$ ( 27 ) = " 03L8 AG# A AGf A " 

2560 D$ ( 28 ) = "03L8AG#AC#4< A" 
2570 D$ ( 2 9 ) = " 03L8D4< B >E4G “ 

2580 D$( 30 )="03L8F#4ED4C#" 

2590 D$ (31 ) = " 02L8BA#BBA#B " 

2600 D$( 32 ) ="02L8B>C#DDC#<B" 
2610 D$ ( 33 ) = "03L8EF#GF#EF#" 
2620 D$( 34 ) = "02L8B>DF#B4A“ 

2630 D$ ( 35 ) = " 03L8G#4BB4G# " 

2640 D$(36)=“03L8E4G#G#4E" 

2650 D$( 37 ) = "03L8C#4F#D4E" 

2660 D$ ( 38 ) = “02L8A4 >AA4E " 

2670 D$ ( 39 ) = "03L8C#4EE4C# " 

2680 D$(40)="O2L8A4>C#C#4<A" 
2690 D$(41 )=“02L8F#4BG4A" 

2700 D$ < 42 ) = " 02L8D4 >DF#4A " 

2710 D$( 43 ) = "03L8B4C#<B4 . &" 
2720 D$ ( 4 4 ) = " 03 L8BG#E#C#E#C# " 
2730 D$( 45 ) = "03L8F#4<F#>F#4E" 
2740 D$( 46 ) = "03L8D<B>DF#DF#" 
2750 D$ ( 47 ) = "03L8B4 >C#D4<G#" 
2760 D$ ( 4 8 ) = “03L8A4F#B4E# " 

2770 D$(49)="03L8F#4<B>C#4<C#" 
2780 D$( 50 ) = "02L8F#A>C#F#EF#" 
2790 D$ ( 5 1 ) = " 03L8DC#DDC#D " 

2800 D$ ( 52 ) = “ 03L8DF#A >D4< F# " 
2810 D$ ( 53 ) = " 03L8G4EC4D " 

2820 D$( 54 ) = "02L8G4 . &GB>D" 

2830 D$(55)="03L8G4EA4. &" 

2840 D$( 56 ) = "03L8A4<EF#A>C“ 
2850 D$ ( 57 ) = “03L8F#4D#G4 . & " 
2860 D$( 58 ) = "03L8G4<D#EGB" 

2870 D$ ( 59 ) = ”03L8E4C#F#4 . & " 
2880 D$( 60 )="03L8F#4<C#D4F#" 
2890 D$(61 )="02L8G4BG#4E" 

2900 D$ ( 62 ) = " 02L8 A4 >C#< A#4F# “ 
2910 D$ ( 63 ) = "02L8B4 AB4G ” 

2920 D$ ( 64 ) = " 03L8C#4< B >C#4< A “ 
2930 D$ ( 65 ) = ”03L8DEF#G4 . & " 

2940 D$ ( 66 ) = " O3L8G4F0G4 A " 

2950 D$ ( 67 ) = ”03L8BAGF#GF# " 

2960 D$ ( 68 ) = “03L8D#4BD4B" 

2970 D$ ( 69 ) = " 03L8C#4 AC4 A " 

2980 D$( 70 ) ="02L8B4>G<B-4>G" 
2990 D$( 71 )="02L8A4. &A>C#E" 
3000 D$(72)=“03L8G>C#E<GF#E" 
3010 D$ ( 73 ) = "03L8F#EDA4< A " 

3020 D$(74)="03D4.&D4" 

3030 E$( 1 )="05D8" 

3040 E$ ( 2 ) = " 05L4 A . B . " 

3050 E$ ( 3 ) = “05L8A4 . &ABC# " 

3060 E$ ( 4 ) = " 06L8DC#< BABG " 

3070 E$ ( 5 ) = "05L8F#EF#D4R8 " 

3080 E$ ( 9 ) = " 05R4R8R4E8 " 

3090 E$ ( 1 0 ) = "05L8AGAAGA " 

3100 E$( 1 1 )=“05L8A4.&ABA" 

3110 E$ ( 1 2 ) = " 05L8GF#GGF#G " 

3120 E$ ( 1 3 ) = “ 05L8G4 . &GAG " 

3130 E$( 14)="05F#8R8R8R4R8" 
3140 E$(23)="06R4R8R4D8" 

3150 E$ ( 24 ) = "06L8C#< BABAG# " 
3160 E$ ( 25 ) - "05A4 . &A4 " 

3170 E$(26)=”04A8" 

3180 E$(27)="05L4E.F#. “ 

3190 E$ ( 28 ) = "05L4E . 8ER8 " 

3208 E$( 30 ) - ”04R4R8R4F#8‘' 

3210 E$( 31 ) = “05L4F#. G. “ 

3220 E$ ( 32 ) = "05L4F# . &F#R8 " 

3230 E$(34)="04R4R8R4F#8" 

3240 E$( 35 )= “05L8DEDDED" 

3250 E$ ( 36 ) = "05L8D4 . &DED " 

3260 E$ ( 37 ) = " 05L4EA8 AG#8 " 

3270 E$ ( 38 ) = " 05L4 AE8E< A8 " 

3280 E$(39)=E$( 12) 

3290 E$(40)=E$( 13) 

3300 E$ ( 4 1 ) = " 05L8 AGF#EF#G " 

3310 E$(42)="05L8F#EF#D4R8" 
3320 E$( 50 ) = "05R4R8R4D8" 

3330 E$(51)="05L4A.B." 

3340 E$ ( 52 ) = "06L8C4 . &C< BA " 

3350 E$ ( 53 ) = " 05L8BAGAGF# " 

3360 E$( 54 )= "05G4R8R4R8" 

3370 E$ ( 65 ) = " 05L8R4AB >C#D" 

3380 E$ ( 66 ) = " 05L8ABAGF#E " 

3390 E$( 67 ) = "05D4R8R4R8" 

3400 E$ ( 72 ) = “ 06R4R8R4C#8 " 

3410 E$( 73) = "06L8D4< AF#ED" 

3420 E$ ( 74 ) = ” 05L4D . &D " 

3430 F$( 1 )=”04A8" 

3440 F$(2)="05L4D.G. “ 

3450 F$( 3 ) = "05L4D . &DG8" 
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3460 F$ ( 4 ) = "05L4AG8F#E8 “ 

3470 F$(5)="05L4D<A8AR8" 

3480 F$ ( 9 ) = " 05R4R8R4E8 " 

3490 F$ ( 1 0 ) = " 05L8F#EF#F#EF# " 

3500 F$ ( 1 1 ) = " O5L8F04 . &F#GF# " 

3510 F$( 12)="05L8EDEEDE” 

3520 F$( 1 3 ) = "05L8E4 . &EF#E" 

3530 F$( 1 4 ) = "05D8R8R8R4R8 " 

3540 F$ ( 23 ) = "05R4R8R4B8 " 

3550 F$ ( 24 ) = " 05L4 AE8EE8 " 

3560 F$(25)="05L4E.&E" 

3570 F$(26)="04A8" 

3580 F$(27 ) ="o418af #a>d<a>d“ 

3590 F$(28)="04L4A. &AR8" 

3600 F$( 30 ) = "05R4R8R4E8" 

3610 F$ ( 3 1 ) = " 05L4D . E . " 

3620 F$ ( 3 2 ) = '' 05L4D . &DR8 " 

3630 F$(36)=”05R4R8R4G#8" 

3640 F$(37)="05L4AF#8F#E8" 

3650 F$( 38) = "05L4E< A8AR8" 

3660 F$ ( 40 ) = " R4R8R405E8 " 

3670 F$(41 )="05L4ED8D<A8" 

3680 F$( 42)="04L4A>D8<AR8" 

3690 F$( 50 ) = "R4R8R404A8" 

3700 F$ ( 5 1 ) = " 05L4D . G . " 

3710 F$ ( 52 ) = "05L4F# . &F#F#8 " 

3720 F$ ( 53 ) = “ 05G4R8R4D8 " 

3730 F$( 54 ) = "05D4R8R4R8 ” 

3740 F$ ( 65 )= "05L8R4F#DEF#" 

3750 F$ ( 66 ) = " 05L8E4F#ED< A ” 

3760 F$( 67 ) = "04F#4R8R4R8 " 

3770 F$ ( 72 ) = "05R4R8R4E8 " 

3780 F$(73)="05L8AGF#F#GA" 

3790 F$ ( 74 ) = " 05L4F# . &F# '' 

3800 OPEN "DATA. M- 5" FOR OUTPUT AS #1 
3810 FOR 1=0 TO 25 : GOSUB »PLAY : NEXT I 
3820 FOR 1=1 TO 74: GOSUB *PLAY : NEXT I 
3830 FOR 1=26 TO 74: GOSUB *PLAY : NEXT I 
3840 CLOSE: END 
3850 *PLAY 

3860 WRITE #1,A$(I),B$(I),C$(I),D$(I),E$(I),F$(I) 
3870 RETURN 
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10 ' CBrandenburgische Konzert Nr. 6 B-Dur BWV.1051) 
20 1 Programed by D.Kobayashl In 1985 
30 'save "MUSIC6 . END" 

40 DIM A$(61 ) . B$ (61 ) , C$ ( 6 1 ) , D$ ( 6 1 ) 

50 A$ ( 0 ) = "O4T70V9Q802" 

60 A$( 1 ) = "R1 . ":A$(2)=A$( 1 ):A$(3)=A$( 1 ) :A$(4)=A$( 1 ) 
70 A$(5)="05R2F2G2" 

80 A$(6)="04AlB-2“ 

90 A$(7)="04L4R4B->CE-8D8E-E-" 

100 A$( 8 ) = "05L4E-D8C8DF8E-8FF" 

110 A$( 9 ) = "05L8F4E-DE-4GFG4FE- " 

120 A$( 1 0 )="05F4 .G8D2C4. <B-8“ 

130 A$( 1 1 )="04L8B-F>DC<B-A-GFE-DE-4" 

140 A$ ( 1 2 ) = "04L8E-G>C<B-AGFE-DCD4 ” 

150 A$( 1 3 ) = "04L8DFB- A-GFE-F1 6G16CE-B-A” 

160 A$( 14)="04B-4<B-4>B-2>C2" 

170 A$( 15)="04DlE-2" 

180 A$( 16)= "04R4L4E-FA-8G8A- A- " 

190 A$( 1 7)="04L8A-4GFG4B-A-B-4B-4" 

200 A$( 18) = "04L8B-4A-GA-4 >C<B- >C4<B-A- " 

210 A$( 1 9 ) = " 04B-4 . >C8<G2F4 . E- 8 " 

220 A$(20 )="04L2E-GA-" 

230 A$(21 )="03B104C2" 

240 A$( 22 ) = "04L4R4CDF8E-8FF" 

250 A$( 23 ) = "04L8F4EDEFEFF4 . G" 

260 A(( 24 ) = "04L8GB-A-GFE-D-C<B-AB-4" 

270 A$ ( 25 ) = "03L8B- >D-GFEDC<B-A-GA-4" 

280 A$( 26 ) = "03L8A- >CFE-D-C<B- >C1 6D- 1 6<GB- >FE" 

290 A$( 27 ) = "04F1 . " : A$( 28 ) =A$( 27 ) 

300 A$( 29 ) = “04L8FA-GFF2E4 . F8" 

310 A$( 30 ) = "04F2R2R2" 

320 A$( 31 ) =A$( 1 ) : A$( 32 ) =A$ (1 ) : A$( 33 ) =A$( 1 ) 

330 A$ ( 34 ) = "05R2E-2F2" 

340 A$ ( 35 ) = " 04G 1 A- 2 “ 

350 A$( 36 ) = "04L4R4A-B- >D-8C8D-D- " 

360 A$ ( 37 ) = "05L4D-C8<B-8 >CE-8D-8E-E- “ 

370 A$( 38 ) = "05L8E-4D-CD-4FE-F4E-D- " 

380 A$( 39 ) = “05E-4 . F8C2<B-4 . A-8" 

390 A$ ( 40 ) = "04L8A-E- >C<B-A-GFE-DE-DE- " 

400 A$( 41 ) ="04L4FFGB-8A-8B-B-" 

410 A$(42) = " 04L8B-CA-GFE- DC< B >C< B >C " 

420 A$( 43 ) = "04L8D4 . A- GFE- DC< B >CE- 1 6D 1 6 “ 

430 A$( 44 ) = " 04L8E-G >E-DC< B- AGF#GF#G " 

440 A$ ( 45 ) = "04L8A4 . >E-DC<B-AGF#GB- 1 6A 1 6 " 



450 A$(46)="04L8B-4>E-4E-FE-DC<B-AB-16>C16“ 

460 A$ ( 47 ) = “04L8F#4D4G4 . DC<B-AB- 1 6G1 6 " 

470 A$ ( 48 ) = "04D2 >D2E-2" 

480 A$(49)="04F#1G2" 

490 A$ ( 50 ) = "04R4L4GA >C8< B-8 >CC" 

500 A$( 51 ) = "05L8C4<B-AB-4>DCD4D4" 

510 A$ ( 52 ) = "05L8D4C<B- >C4E-DE-4DC" 

520 A$(53)="05L8D4.E-<B-2AGA4" 

530 A$( 54 ) = " V08O4G1 . ” 

540 A$(55)=“05C1 . " 

550 A$(56)="04F#1 . " 

560 A$ ( 57 ) = " O4L4F0DV 1 0EG8F#8GG " 

570 A$(58)="04L8GB-AGF#2.G4" 

580 A$(59)="O4L4GV08B- >CE- 8D8E- 2 " 

590 A$(60)="O5L4E-<AB- >D8C8D2" 

600 A$ ( 6 1 ) = " 05L8DE- DC< B- AGF#GL 1 6AB-A8B- >C<F# 1 . " 
610 B$( 0 ) = "T70O4V9Q892" 

620 B$( 1 )="04R2B-2>C2" 

630 B$(2)="04DlE-2" 

640 B$( 3 ) = "04R4L4E-FA-8G8A-A- " 

650 B$ ( 4 ) = "04L8A- 4GFGAGAA4 . B- " 

660 B$( 5)=A$( 1 1 ) : B$( 6 )=A$( 12) 

670 B$ ( 7 ) = "04L8DFB- AGFE-F1 6G1 6CE-B-A" 

680 B$ ( 8 ) = “ 04B- 1 . 11 
690 B$(9)=B$(8) 

700 B$( 10)= "04L8B- >DC<B-B-2A4 . B- " 

710 B$C 1 1 )="04L2B-FG" 

720 B$( 12)="03AlB-2" 

730 B$( 13)= "03L4R4B- >CE-8D8E-E- " 

740 B$< 14)="04L8E-DCDE-D-C<B-A-GA-4" 

750 B$ ( 1 5 ) = "03L8A- >CFE-DC<B- A-GFG4 " 

760 B$ ( 1 6 ) = "03L8G>B- >E-DC<B- A-B- 1 6 >C1 6<FA- >E-D" 
770 B$( 1 7 ) = "05E- 1 . " 

780 B$( 18)=B$( 17) 

790 B$ ( 1 9 ) = “05L8E-GFE-E-2D4 . E- " 

800 B$ ( 20 ) = "05E- 1 R2 " 

810 B$(21)="R1." 

820 B$(22)=B$(21 ) 

830 B$( 23 ) =B$( 21 ) 

840 B$ ( 24 ) = " 05R2C2D- 2 " 

850 B$(25)="04E1F2" 

860 B$ ( 26 ) = "04L4R4FGB-8A-8B-B- " 

870 B$ ( 27 ) = "04L4B-A-8G8A- >C8<B- 8 >CC" 

880 B$(28)="05L8C4<B-A-B-4>D-CD-4C<B-" 

890 B$(29)="05L4C.D-8<A-2G.F8" 

900 B$( 30 ) = "04L8F2A-2XXB- >C4“ 

910 B$(31 )=“04DlE-2" 

920 B$ ( 32 ) = "04R4L4E-FA-8G8A- A- " 

930 B$ ( 33 ) = "04L8A-4GFGA-GA- A-4 . G1 6A- 1 6 " 

940 B$ ( 34 ) = "04L8B- >D-C<B-A-GFE-D-CD-4 “ 

950 B$ ( 35 ) = “04L8D-FB- A-GFE-D-C<B- >C4 “ 

960 B$ ( 36 ) = "04L8CE- A-GFE-D-E- 1 6F1 6< B- >D-A-G" 

970 B$(37)="04A-1 . " 

980 B$( 38 ) =B$( 37 ) 

990 B$ ( 39 ) = "04L8A- >C<B- A- A-2G4 . A- " 

1000 B$(40 ) ="04L4A-E-FA-8G8A-A-" 

1010 B$( 41 ) = "04L8A- >C<B-A-GFEG1 6F1 6GB-A-G" 

1020 B$( 42 )=“05L4C<CDF9E-8FF” 

1030 B$ ( 4 3 ) = " 04L8FA-GFE-DCE- 1 6D 1 6E-DE- 4 " 

1040 B$ ( 44 ) = " 04L4E-GA >C8< B- 8 >CC“ 

1050 B$ ( 45 ) = "05L8CE-DC<B- AGB- 1 6A1 6B- AB-4 " 

1060 B$ ( 46 ) = "04L8B-GAB- >C<B- >CE- 1 6D1 6E-DCD1 6E- 1 6 " 
1070 B$ ( 47 ) = "04L8A4 >D4C< B- AGFE-DG1 6F# 1 6G" 

1080 B$( 48 ) = " 04L8F#DEF#GFE- DC< B >C4 " 

1090 B$( 49 ) = "04L8CE-AGF#EDC<B-AB-4" 

1100 B$( 50 )="03L8B- >DGFE-DCD16E-16<A>CGF#“ 

1110 B$(51 )="04G1 . " 

1120 B$(52)=B$(51 ) 

1130 B$( 53 ) = "O4L8GB-AGG2F04 . G" 

1140 B$( 54 ) = " V08O4F1 . " 

1150 B$( 55 ) = "04E1 . " 

1160 B$( 56 ) = "04E- 1 . " 

1170 B$( 57 ) = "04L4E-V1 0<F#GB-8A8B- >D8C8" 

1180 B$( 58 ) = "04L4D. E-8<B-2A4 . G8" 

1190 B$ ( 59 ) = " 03G2R4 V08L8 >GFE-DCD 1 6E- 1 6 " 

1200 B$(60 )= "03A2R4L8>FE-DC<B->C16D16" 

1210 B$ ( 6 1 ) = " 03G4 . >L8E-DC< B- AB-G>DCD 1 " 

1220 C$( 0 )="T70Q8L4V06" 

1230 C$(l )="03L4E-FGE-A-F" 

1240 C$( 2 ) = "03L4B-A-B-G>C<B- " 

1250 C$( 3 )= "03L4A-GA-FB-<B- " 

1260 C$ ( 4 ) = “03L4E-FE-DCE- " 

1270 C$ ( 5 ) = " 03L4DCD< B- >E- C " 

1280 C$( 6 ) = "03L4FE-FDGF" 

1290 C$( 7 ) = "03L4E-DE-CF<F" 

1300 C$ ( 8 ) = " 02L4B- >FB- >C< B- A- " 

1310 C$( 9 ) = "03L4GA-GFE-G" 

1320 C$( 10)="O3L4DE-FE-F<F" 

1330 C$( 1 1 )=”02L4B->CD<B->E-C" 

1340 C$( 1 2 ) = "03L4FE-FDGF" 

1350 C$( 1 3 ) = "03L4E-DE-CF<F" 

1360 C$( 14)="02L4B-A-GE-A-F" 

1370 C$( 1 5 ) = “02L4B-A-B-G>C<B- " 

1380 C$( 1 6 ) = "02L4A-GA-FB-B- “ 



1390 C$( 1 7 ) = “02L4E- >b- >E-FE-D- " 

1400 C$(18)="04L4CD-C<B-A->C" 

1410 C$(19)="03L4GA-B-A-B-<B-" 

1420 C$ ( 20 ) = " 03L4E-DE-CFD" 

1430 C$(21 )="03L4GFGE-A-G“ 

1440 C$( 22)="03L4FE-FDG<G" 

1450 C$(23)="03L4C>C<B-A-GF" 

1460 C$ ( 24 ) = “03L4EC< A-FB-G" 

1 47 0 C$ < 2 5 ) = " 03L4C< B- >C< A- >D-C ” 

1480 C$( 26 ) = "02L4B- A-B-G>C<C“ 

1490 C$ ( 27 ) = " 02L4F >CFGFE " 

1500 C$ ( 28 ) = “03L4D-E-D-C<B- >D- “ 

1510 C$ ( 29 ) = “02L4A-B- >C<B- >C<C“ 

1520 C$ ( 30 ) = " 02L4F >CFGA-G " 

1530 C$(31 )="03L4A-B-8>C8<B-A-GE-“ 

1540 C$ < 32 ) = “02L4A-GA-FB-<B- " 

1 550 C$( 33 ) = "03L4E- >E-D-C<B-A- " 

1560 C$ ( 34 ) = " 02L4GE-C< A-D-B- " 

1570 C$( 35 ) = "03L4E-D-E-CFE- ” 

1 580 C$( 36 ) = "02L4D-CD-<B- >E-<E- “ 

1 590 C$( 37 ) = "02L4A- >E- A-B-A-G- “ 

1600 C$ ( 38 ) - "03L4FG-FE-D-F" 

1610 C$ ( 39 ) = “031 4CD-E-D-E-<E- " 

1620 C$(40)="O2L2A->A->C" 

1630 C$(41 )=”03D1E2" 

1640 C$ ( 4 2 ) = " 03L2R2FA- “ 

1650 C$(43)="02B1 >C2" 

1660 C$ ( 44 ) = " 04R2L2CE- " 

1670 C$(45)="03F#1G2“ 

1680 C$( 46)=“03R4L4GA>C8<B-8>CC" 

1690 C$ < 47 ) = "04L8C4< B-AB- >C<B- >CC4 . D" 

1700 C$ ( 48 ) = " 04L4DC< B-G >C< A " 

1710 C$( 49 ) = “04L4DCD<B- >E-D" 

1720 C$(50 )="04L4C<B- >C<A>D<D" 

1730 C$(51 )="03L4GDGAGF” 

1740 C$ ( 52 ) = “ 03L4E-FE-DCE- " 

1750 C$ ( 5 3 ) = " 02L4B- >CDCD< A " 

1760 C$ ( 54 ) = ”02L8BAGAB>CDE-FGA-G" 

1770 C$ ( 55 ) = “03L8B- AGFEDC<B-AGF#A1 6G1 6" 

1 780 C$( 56 ) = " 02L4ADA >C8< B-8 >CC“ 

1790 C$ < 57 ) = " 03L4C2< BAGA " 

1800 C$ ( 58 ) = “02L4B- >CDCD< D" 

1810 C$ < 59 ) = " 02L8G >DGFE- DC< B >C< B- AB- 1 6 >C 1 6 “ 
1 820 C$ ( 60 ) = "02L8F>CFE-DC<B- AB- AGA1 6B- 1 6 " 
1830 C$(61 )="02E-2R2E-2D1 . " 

1840 D$( 0 ) = "T70V05O4Q8@0 " 

1850 D$( 1 )="04L2E-GA-" 

1860 D$(2)="04B-1 >C2“ 

1870 D$(3)="04A-FB-“ 

1880 D$(4)="04E-DC" 

1890 D$ ( 5 ) = " 03B- >DE- " 

1900 D$(6)="04F1G2" 

1910 D$(7)="04E-1F2" 

1920 D$ ( 8 ) = " 03L2B- >B- A- " 

1930 D$ ( 9 ) = '' 04L2GFE- " 

1940 D$( 1 0 ) ="04L2D4E-4F<F" 

1950 D$ ( 1 1 ) = "03L2B- >DE- " 

1960 D$( 1 2 ) = "04F1G2" 

1970 D$( 13)="04E-1F2“ 
ia80 D$( 1 4 )="03L2B-GA" 

1990 D$ ( 1 5 ) = " 03B- 1 >C2 “ 

2000 D$ ( 1 6 ) = " 03A- 1 B- 2 " 

2010 D$( 17)=“03L2E- >E-D-" 

2020 D$( 18)="04L2C<B-A-" 

2030 D$ ( 1 9 ) ■ “ 03L2G4A- 4B- B- " 

2040 D$( 20 )="03L2E->E-F“ 

2050 D$(21 )="04GlA-2" 

2060 D$ ( 22 ) = “ 04L2FDG " 

2070 D$(23)="04C1 . " 

2080 D$( 24 ) = "04L2CXA-B-" 

2090 D$(25)="04ClD-2” 

2100 D$(26)="03B-1 >C2" 

2110 D$ ( 27 ) = "03L2F >FE- " 

2120 D$(28)="04L2D-C<B-“ 

2130 D$ ( 29 ) = "03L2A-4B-4 >C<C" 

2140 D$( 30 ) = "03F1 . “ 

2150 D$( 31 )= "03B-1 >C2" 

2160 D$<32)="03A-lB-2" 

2170 D$(33)="03E-1." 

2180 D$(34)="03E-2>C2D-2“ 

2190 D$(35)=”04E-1F2" 

2200 D$ ( 36 ) = " 04D- 1 E-2 “ 

2210 D$ ( 37 ) = " 03L2A- >A- " 

2220 D$( 38 ) ="04L2FE-D- " 

2230 D$ ( 39 ) = “04L2C4D-4E-<E- " 

2240 D$(40 )="03L2A->A->C" 

2250 D$(41 )="04D1E2" 

2260 D$ ( 42 ) = “04R2F2A-2" 

2270 D$(43)=“03B1 >C2“ 

2280 D$ ( 44 ) = " L2R204CE- " 

2290 D$( 45 ) = “03F#1G2" 

2300 D$ ( 46 ) = " 03R4L4GAB- >C2 " 

2310 D$ ( 47 ) = "04C4<B-8A8B-2>C2“ 

2320 D$(48)="04L2D<G>C“ 



2330 D$( 49 ) = "04D1 E-2 “ 

2340 D$( 50 )="04C1D2" 

2350 D$ ( 5 1 ) = " 03L2G >GF “ 

2360 D$(52)="04L2E-DC“ 

2370 D$( 53 ) = "03L2B-4>C4DC" 

2380 D$ ( 54 ) = " 03B2R2R2 “ 

2390 D$ ( 55 ) = "03B- 2R2R2 " 

2400 D$ ( 56 ) = "03L4ADAB- >CC“ 

2410 D$ ( 57 ) = “04C2L4<B- AGA" 

2420 D$ ( 58 ) = “03L4B- >CDCD< D ” 

2430 D$ ( 59 ) = “ 03G2R2 >C2 “ 

2440 D$( 60 1 = "03F2R2B-2" 

2450 D$(61 )=“03E-2R2E-2D1 . " 

2460 OPEN "DATA. End" FOR OUTPUT AS #1 
2470 FOR 1=0 TO 61 STEP 2 

2480 A$=A$( I )+A$( 1 + 1 ) :B$=B$( I )+B$( 1 + 1 ) :C$=C$( I ) + — i 

2490 WRITE #1 ,A$.B$,D$,C$ , 1 

2500 NEXT I : CLOSE C$( 1+1 ) :D$=D$(I)+D$< 1+1) 
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10 ' [Orchestral suiten No. 2-6 Menuet] 
20 ' Programed by D.Kobayashl in 1986 
30 ’save "MUSIC7.0PE" 

40 DIM A$ ( 22 ) . B$ ( 22 ) , C$ ( 22 ) . D$ ( 22 ) 

50 A$( 0 ) = "T1 10O4Q8902V9" 

60 A$(1)="04L8B>C#DF#B4" 

70 A$ ( 2 ) = " AG2&G8&G4F#4E4 " 

80 A$ ( 3 ) = " D4C#D< B4 " 

90 A$ ( 4 ) = “ >GF#EA#BG " 

100 A$ C 5 ) = " F#ED A#BF# " 

110 A$ ( 6 ) = “ EDC#F#D< B “ 

120 A$ ( 7 ) = " >DC#2&C" 

130 A$(8)="04F#G#A#>C#F#4" 

140 A$(9)="E8D2&D8" 

150 A$( 1 0 )="<AB>C#EA4" 

160 A$(11)="GF#2&F#" 

170 A$(12)="<BAG>C#D<B" 

180 A$( 13)=“AGF#>C#D<A“ 

190 A$( 14)="G4F#4E4” 

200 A$ ( 1 5 ) = " D2 . " 

210 A$ ( 1 6 ) = " >F#ED#< B >A4 " 

220 A$( 17)=“AG28G" 

230 A$ ( 1 8 ) = " C#DEAG4 “ 

240 A$( 19)="GF#2&F#" 

250 A$ ( 2 0 ) = " < A#B >C#ED< BGF#E >DC#A# " 

260 A$(21 )="B4F#EDC#“ 

270 A$(22)="<B2. " 

280 B$ ( 0 ) = “04T 1 1 0Q8S2L8V9 " 

290 B$( 1 )=“04F#4B4B4“ 

300 B$(2) = “B2. >L8C#DC#< B >C#< A# " 

310 B$C3)="L4BF#B" 

320 B$(4)="B>EG" 

330 B$(5) = "<B>DF(t" 

340 B$(6) = "<A# >C#< B " 

350 B$(7)="A#2. " 

360 B$ ( 8 ) = “ L4F# >C#C# " 

370 B$ ( 9 ) = “ < B2 . " 

380 B$( 10)="EAA" 

390 B$( 1 1 )="A2. " 

400 B$( 12)=“GDG" 

410 B$< 13)=“ADA" 

420 B$( 14)=“<GB>C#" 

430 B$( 15)="<A2. " 

440 B$(16)=“>>D#8E8F#F#" 

450 B$ ( 1 7 ) = " E2 . “ 

460 B$ ( 1 8 ) = “ < EA >C# “ 

470 B$( 19)="D2. " 

480 B$( 20 ) = "E< A#B&B>EG" 

490 B$ ( 2 1 ) = " L8F#EDC#< BA# " 

500 B$(22)=“F#2. " 

510 C$( 0 )="T1 1 0O4L4Q8V8" 

520 C$(l )="04L4DF#F#" 

530 C$(2)=”E2.&E4<C#G#" 

540 C$(3)="F#4.D8E8F#8" 

550 C$(4)="E<B>E" 

560 C$(5)="F#<B>D“ 

570 C$(6)=" EF#F#" 

580 C$t7)="F#2." 

590 C$(8)="C#F#F#" 

600 C$(9)="F#2.” 

610 C$( 10 )="AEE“ 

620 C$( 1 1 )=“D2. “ 

630 C$( 12)="DGB" 

640 C$(13)=“DF#A" 

650 C$ C 1 4 ) = “ DD< A “ 

660 C$(15)="F#2. 

670 C$( 16)="BBB" 

680 C$(17)="B2.“ 



690 C$( 18)="AAA" 

700 C$( 19)="A2. ” 

710 C$ ( 20 ) = " >GF#F#E< B >C#" 

720 C$(21 )="D8C#8<B>F#" 

730 C$(22)="D2. " 

740 D$( 0 ) = "T1 1 0O4Q800V6" 

750 D$ ( 1 ) = " 04L4B< B >D“ 

760 D$ ( 2 ) = " L8EF0GB >EC#< BA# 4 . F#4 " 

770 D$( 3 ) = "B4 . <L8B>C#D" 

780 D$(4)="L4EGC#" 

790 D$(5)=“DF#<B" 

800 D$ ( 6 ) = " >C#< A#B " 

810 D$ ( 7 ) = " F# >L8F #G#A#F# " 

820 D$( 8 ) = ”03L4A#F#A#" 

830 D$ ( 9 ) = “ L8B >C#DF#B< B" 

840 D$( 10 )="L4>C#<A>C#" 

850 D$( 1 1 )="L8DEF#A>D<D" 

860 D$( 12)="L4GBE“ 

870 D$( 13 )="F#AD" 

880 D$ ( 1 4 ) = " < BGA " 

890 D$ ( 1 5 ) = " L8DF#A >DF#A " 

900 D$ ( 1 6 ) = " L4< B >BD# " 

910 D$C 17)="L8EF#GB>E<E" 

920 D$( 18)=“AC#<A” 

930 D$( 19)="L8DEF#A>DF#“ 

940 D$ ( 20 ) = " L4C#< F#BE >L8GF#EF# " 

950 D$(21 )=”DEF#4<F#4" 

960 D$(22)="B2. " 

970 OPEN "DATA. Ope” FOR OUTPUT AS #1 
980 FOR 1=0 TO 7 : GOSUB *PLAY : NEXT I 
990 FOR 1 = 1 TO 22: GOSUB *PLAY : NEXT I 
1000 FOR 1=8 TO 22: GOSUB *PLAY : NEXT I 
1010 CLOSE: END 

1020 *PLAY : WRITE #1 . A$( I ) , B$( 1 ) . D$< I ) . A$( I ) ,C$( I ) 
1030 RETURN 
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10 •Performing MUSIC1 

20 'Answer "How many files (1-15) ? 6” 

30 'save "list pi " 

40 NEW CMD 

50 OPEN "DATA A.M-1" FOR INPUT AS #1 

60 OPEN "DATA B.M-1" FOR INPUT AS #2 

70 OPEN "DATA C.M-1" FOR INPUT AS #3 

80 OPEN "DATA D.M-1" FOR INPUT AS #4 

90 OPEN "DATA E.M-1" FOR INPUT AS #5 

100 OPEN "DATA F.M-1" FOR INPUT AS #6 
110 IF EOF ( 1 ) THEN CLOSE : END 
120 INPUT #1,A$: INPUT #2. B$: INPUT #3,C$ 
130 INPUT #4, D$: INPUT #5, E$: INPUT #6,F$ 
140 CMD PLAY #2,A$,B$,D$,C$,E$,F$ 

150 GOTO 110 
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10 'Performing MUSIC2~7 
20 ' 

30 'save "list p2" 

40 NEW CMD 
50 DIM F I LE$ ( 6 ) 

60 CLS:PRINT "Select Music Number (1-6) 

70 FOR 1 = 1 TO 6 : READ FILE$( I ) : PRINT I:"-— " :F1LE$( I ) : NEXT I 
80 1$=INKEY$: IF 1$="" GOTO 80 
90 I=VAL(I$) 

100 IF I >6 OR I<1 GOTO 80 
110 OPEN F I LE$ ( I ) FOR INPUT AS #1 
120 ON I GOTO »P1 ,*P2,*P2,*P2,*P1 ,*P3 
130 «P1 

140 IF EOF(l) THEN CLOSE: END 
150 INPUT #1,A$,B$,D$.C$ 

160 CMD PLAY #2,A$,B$,D$,C$ 

170 GOTO 140 
180 *P2 

190 INPUT #1.A$,B$,C$,D$,E$,F$ 

200 CMD PLAY #2 , A$ , B$ , D$ , C$ , E$ , F$ : CMD PLAY #2,"rl" 

210 IF EOF ( 1 ) THEN CLOSE : END 
220 INPUT #1,A$,B$,C$,D$,E$,F$ 

230 CMD PLAY #2 , A$, B$, D$, C$, E$, F$ 

240 GOTO 210 
250 *P3 

260 IF EOF ( 1 ) THEN CLOSE: END 
270 INPUT #1 ,A$,B$,C$,D$,E$ 

280 CMD PLAY #2, A$,B$,C$,D$,E$ 

290 GOTO 260 

300 DATA DATA. M-2. DATA. M-3. DATA. M-4. DATA. M-5, DATA. End. DATA. Ope 
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100 ’ PC-88VAfflfi»nA7’nr7i by Alb* 

110 ’ 

120 INPUT "-fe7>y hTKVX" ;SEGM$ 

130 INPUT n mi6*7±V 17KVX";SOFF$ 

140 input "iR7^7Ay 17 Kvx";eoff$ 

150 SEGM=VAL("&H" + SEGM$) : DEF SEG=SEGM 

160 SOFF=VAL( ”4H”+S0FF$) : SOFF=INT ( SOFF/16 ) * 16 : IF SOFF<0 THEN SOFF=SOFF+65536 ! 
170 EOFF=VAL("&H"+EOFF$) : IF EOFF<0 THEN EOFF=EOFF+65536 ! 

180 INPUT ”7'J V^CflSyjLi1-*‘(Y/N)";PS$ 

190 IF PS$=”Y" OR PS$="y" THEN OPEN "LPT:" FOR OUTPUT AS #1 ELSE OPEN "SCRN:" FO 
R OUTPUT AS #1 
200 ’ 

210 DEF FNH$(N)=RIGHT$("0"+HEX$<N) ,2) 

220 ADDR=SOFF 
230 DIM VSUM (15) 

240 WHILE NOT ( ADDR>EOFF ) 

250 PRINT #1 , "SEGMIOFFS +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :SUM" 

260 FOR T=0 TO 15: VSUM(T)=0: NEXT 

270 FOR TY=0 TO 15 

280 PRINT #1,SEGM$;":"; 

290 PRINT # 1 , RIGHTS ( "000"+HEX$ ( ADDR) , 4 ) ; ” "; 

300 HSUM=0 

310 FOR TX=0 TO 15 

320 DAT=PEEK(ADDR) : ADDR=ADDR+1 

330 HSUM=HSUM+DAT : VSUM ( TX) = VSUM ( TX ) +DAT 

340 PRINT #1,FNH*( DAT) ; 

350 IF TX=7 THEN PRINT #1,"-"; ELSE PRINT #1," 

360 NEXT TX 

370 PRINT #1,":";FNH$(HSUM) 

380 NEXT 

390 PRINT #1 , STRING$ ( 63 , "-" ) 

400 TSUM=0 

410 PRINT #1," VSUM H ; 

420 FOR T=0 TO 15 

430 PRINT #1,FNH$(VSUM(T) ) ;" "; 

440 TSUM=TSUM+VSUM(T) 

450 NEXT 

460 PRINT #1 , " : " ; FNH$ ( TSUM ) 

470 ’ 

480 IF PS$ = "N" OR PS$ = "n" THEN PRINT — tlft - St - ” : A$ = INPUT$ 

(1) 

490 PRINT #1,: PRINT #1,: PRINT #1, 

500 WEND 

510 PRINT "ftfco-e-t" 
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DEFINT A-Z 

SCREEN WIDTH 5,640,4: SCREEN ,0 
DIM G% (10) 

GX=0 
♦ LOOP 

READ P: IF P<0 THEN *SVPAT 

NEED . BYTEs ( X/2 ) *Y+4 : MAX . A=NEED . BYTEV2+ 1 
ERASE G%: DIM GX(MAX.A) 

G%(0 ) =X: G%( 1 ) =Y 

FOR T=2 TO MAX. A: READ D$ : G%(T) sVAL( "AH"+D$ ) : NEXT 

PUT ( GX , 0 ) , G% , PSET : GXsGX+X+8 

PUT PATTERN P,G%,4 

GOTO *LOOP 

♦SVPAT 

SAVE PATTERN "GAME . S PR" , ALL 

PRINT "x754 

END 



DATA 1,64 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 7700 
DATA 7777 
DATA 0700 
DATA 0000 
DATA 0000 
DATA 0200 
DATA 2200 
DATA AA02 
DATA ABAB 
DATA B2A8 
DATA B28A 
DATA 0200 
DATA 0800 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000, 

DATA 10,16,8 
DATA 0077, 
DATA 7700 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 0000 
DATA 7700 
DATA 0077 
\ 0000 



’ 77X* 



DATA 1 
DATA 0000 
DATA 0000 
DATA 2200 
DATA 2222 
DATA BBBB 
DATA 0000 
DATA 0000 
DATA 2B00 
DATA 0000 

DATA 12,16,8 



DATA 0000 
DATA 0000 
DATA 0000 
DATA 060F 
DATA F6F0 
DATA F000 
DATA 7700 
DATA 0077 
DATA 0000 
’ 7?X*- 
DATA 13,16,8 
DATA 0000, 
DATA 7000 
DATA B0A0 
DATA 200B 
DATA BA20 
DATA 000A 
DATA 0A07 



F70F 

7877 

BOFB 

00B0 

0000 



0000 

0000 

0000 



0000 

0000 

0000 

0000 

0000 

0000 



,7700 

,0077 

,0000 

,0000 

,0000 

,0000 

,0077 

,7700 



®JZ 



16,8 

2200, 00B0 

2222, 

2222 
2222 
BBBB 
0B00 
0B2B 
0B00 



00B0 



, 2B00 
, 002B 
,0000 
, BBBB 
,2222 
, BB22 
, OOBB 
,0000 



2202 

2022 

0020 

0000 

0060 

0000 



0000,0000,0000 



,0000 

7070, 

0702,7607 
AA2A ,7707 
2A7A.A7AA 
A0A7 , 0000 



,2066 

,2266 

,2277 

,2077 
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1980 DATA 0000,0000,0000,0000 
1990 DATA 0000,0000 
2000 > 

2010 DATA 20,32,20 

2020 DATA 0077,0000,0070,7700,0770,0060,0000,0000 
2030 DATA 0607,7060,7070,7000,0600,7007,0000,0700 
2040 DATA 0000,6066,0000,0060,0600,0600,7700,0000 
2050 DATA 0000,6666,0760,6060,0000,6706,0000,0000 
2060 DATA 7070 , 6606 , 0760 , 60B2 , BOOB , 6B66 , OOBO , 0060 
2070 DATA 0000 , 6007 , 0B66 , 660B , 66BB, 0B06 , 6600 ,0700 
2080 DATA 0000, BBOO , 6B06 , 6BBB, OOBB ,B066 , 0006, 0000 
2090 DATA 0007 , 0000 , 6600 , OOBB , B6B0 , 866B , 0060 , 0000 
2100 DATA 0000, 0200, 0080, B6BB, 6677, 66B6 , BOOB, 0000 
2110 DATA 7600, 0666, 0766, 777B , 7B76 , 62B6 , 07BB , 6066 
2120 DATA 6666, BBB6, 6066, 7007, 7777, 6626, 7022, 0770 
2130 DATA 7000, 0200, B07B, 0000, 72B7.B0BB, 0000, 0007 
2140 DATA 0000, 0000, 66B8, 0680, 6B6B, 6006, 0080, 0007 
2150 DATA 0000, 0070, 66B0 ,B688 ,B76B , 66BB, 0066, 0000 
2160 DATA 0700, 0707, 6802, B6BB , BB06 , 06BB , 6060, 0000 
2170 DATA 0000, 7700, 6B26, OOBB, 6260, BBOB, 0600, 0006 
2180 DATA 0000, 0000, 0B62, 0700, 6007, B022, 7000, 6000 
2190 DATA 0000,0000,0070,0760,6000,0000,0000,0607 
2200 DATA 0000,0000,0070,0070,7600,0700,0000,0000 
2210 DATA 7700,0000,0600,7000,7007,0070,0000,0000 
2220 DATA 0000,0000 
2230 • EUSUFOl 
2240 DATA 30,32,16 

2250 DATA 0000 , 0000 , FFOO , FFFF , FFFF , 0088 , 0000 , 0000 
2260 DATA 0000 , 0700, 7F77 , FFFF, 88FF , 8888 , 0080 ,0000 
2270 DATA 0000 , 7707 , FFFF , FFFF , 8888 , 8888 , B088 , 0000 
2280 DATA 0700 , 7F77 , FFF7 , 88FF , 8888 , 8888 , 8888 , OOBO 
2290 DATA 7700 , FF77 , FF7F , F8F8 , 8888 , 8888 , 8B8B , OOBB 
2300 DATA 7707 , 7F7F, FFFF , 888F , 8888 , AA88 , 8B88 ,B08B 
2310 DATA 7777, FFFF , F8FF , 8FF8 , 8A88 , AAAA , B888 , BBBB 
2320 DATA 7777 , FFF7 , 8F8F, 8888 ,AA8A, AAAA, 8B8B.BB8B 
2330 DATA 7F77 , FFFF , F8F8 , 8AF8 , AAAA , AAAA , B8B8 , BBBB 
2340 DATA 7F77,FF7F,8F8F, 8888, AA8A, AAAA, 8B8B,BB8B 
2350 DATA 7F07 , F8FF , F8F8 , F888 , 8A88 , AAAA, BBB8 , BOBB 
2360 DATA 7700 , FFFF , 8F8F , 8888 , 8888 , AA8A , B88B , OOBB 
2370 DATA 0700 , F87F ,F8F8 ,B88F , B8B8 ,BAB8 , 8B8B, OOBO 
2380 DATA 0000 , 8FB8 , 8F8F , 8B8B, 8B8B , 8B8B , BBBB, 0000 
2390 DATA 0000, BBOO, 8888, B8B8.B8B8, BBBB, OOBO, 0000 
2400 DATA 0000 , 0000 , BBOO , BBBB , BBBB , OOBB , 0000 , 0000 
2410 DATA 0000,0000 
2420 ’ @feUF02 
2430 DATA 31,32,16 

2440 DATA 0000 , 0000 , FFOO , FFFF , FFFF , 0088 , 0000 , 0000 



2450 DATA 0000 , 0700 , 7F77 , FFFF , 88FF , 8888 , 0080 , 0000 
2460 DATA 0000 , 7707 , FFFF , FFFF , 8888 , 8888 , B088 , 0000 

2470 DATA 0700 , 7F77 , FFF7 , 88FF , 8888 , 8888 , 8888 , OOBO ■ 

2480 DATA 7700 , FF77 , FF7F , F8F8 , 8888 , 8888 , 8B8B , OOBB 

2490 DATA 7707 , 7F7F , 2222 , 88FF , 8888 , 8888 , 8B88 , B08B 

2500 DATA 7777, FFFF, 2222, 2222, 8888, 8888, B888, BBBB 

2510 DATA 7777, FFF7, 2222, 2222, 8828, 8888, 8B8B, BBBB 

2520 DATA 7F77, FFFF, 2222, 2822, 8888, 8888, B8B8, BBBB 

2530 DATA 7F77.FF7F, 2222, 8828, 8888, 8B88,8B8B, BBBB 

2540 DATA 7F07 , F8FF , 2822 , 8888 , 8888 , B8B8 , BBB8 , BOBB 

2550 DATA 7700 , FFFF , 8F22 , 8888 , 8B88 , 8B8B, BB8B , OOBB 

2560 DATA 0700 , F87F , F828 , 8888 , B8B8 , B8B8 , BBBB , OOBO 

2570 DATA 0000 , 8FB8 , 8F2F , 8B8B , 8B8B , BB8B , BBBB , 0000 

2580 DATA 0000, BBOO, B888 ,B8B8 , BBB8 , BBBB, OOBO, 0000 



2590 DATA 0000 , 0000 , BBOO , BBBB , BBBB , OOBB , 0000 , 0000 
2600 DATA 0000,0000 
2610 ’ 0*sUFO3 
2620 DATA 32,32,16 

2630 DATA 0000 , 0000 , FFOO , FFFF , FFFF , 0088 , 0000 , 0000 
2640 DATA 0000, 0700, FF77, FFFF, 88FF, 8888, 0080, 0000 
2650 DATA 0000 , 7207 , FF2F , FFFF, 8888 ,A888 ,B088 , 0000 
2660 DATA 0700 , 227 2 , FF2F , F8FF , 8888 , AA88 , 88AA , OOBO 
2670 DATA 7200 , 2222 , FF22 , F8FF , 8888 , 8A88 , AAAA , OOBB 
2680 DATA 2207, 2F22, FFFF, 88FF, 8888, 8888, AA8A.B0AB 
2690 DATA 2272 , FFFF, FFFF, 88F8 , 8888 , 8888 , BB88 ,BBAA 
2700 DATA 2772 , FFF7 , FFFF , 88F8 , 8888 , 8888 , 8B8B , ABBB 
2710 DATA 7F22, FFFF, FFFF, 8888, 8888, 8888, B8B8, BBBB 
2720 DATA 7F27,FF77,8FFF, 8888, 8888, 8B88.8B8B, BBBB 
2730 DATA 7F07.F877.F8FF, 8888, 8888, B8B8.BBB8, BOBB 
2740 DATA 7700 , FFFF , 8FFF , 8888 , 8B88 , 8B8B , BB8B , OOBB 
2750 DATA 7700, F87F.F8F8, 8888, B8B8.B8B8, BBBB, OOBO 
2760 DATA 0007 , 8FB8 , 8FFF , 8B8B , 8B8B , BB8B , BBBB , 0000 
2770 DATA 0000 , BBOO , B888 , B8B8 , BBB8 , BBBB , OOBO , 0000 
2780 DATA 0000 , 0000 , BBOO , BBBB , BBBB , OOBB , 0000 , 0000 
2790 DATA 0000,0000 
2800 ’ UFOfW2 
2810 DATA 40,32,20 

2820 DATA 0000,0000,0800,8888,8888,0080,0000,0000 
2830 DATA oood, 0800, 8B88 , BBBB, BBBB, 88B8 , OOBO, 0000 
2840 DATA 0000 , 8F08 , BB8B , BBBB , BBBB , B8BB , B08B , 0000 
2850 DATA 0000, 7888, BBBB, 22B2,2B22, BBBB, BB88 , 0000 
2860 DATA 0800, 8B87, BBBB, 22BB.BB22, BBBB, 8BB8 , OOBO 
2870 DATA 8800 , 8BFF , BB2B , B2BB , BB2B , B2BB , 8BBF , OOBB 
2880 DATA 8F08,8B8F,BB22, BBBB, BBBB, 22BB.8BBF, BOBB 
2890 DATA F808 , 8BFF , 2B22 , BBBB , BBBB , 22B2 , 8BBF , BOBB 
2900 DATA 8F8F , F88B , 2BB2 , BBBB , BBBB , 2BB2 , BB78 , BBBB 
2910 DATA F828,B8BB,BB8B, BBBB, BBBB, 7 8BB.BB8B, BBBB 
2920 DATA 8B8F , BB8B , 8888 , 228B , BF22 , 8B88 , BBBB , 2BBB 
2930 DATA BB28 , BBB8 , 88BB , 8888 , 8888 , BB8B , BBBB , BBBB 
2940 DATA 8B8B, BBBB, BBBB, BBBB, BBBB, BBBB, BBBB, 2BBB 
2950 DATA B80B, BBBB, BBBB, BBBB, BBBB, BBBB, BBBB, BBBB 
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2960 

2970 

2980 

2990 

3000 

3010 

3020 

3030 

3050 

3060 

3070 



3090 

3100 

3110 

3120 

3130 

3140 

3150 

3160 

3170 

3180 

3190 



3210 

3220 

3230 

3240 

3250 

3270 



3290 

3300 

3310 

3320 

3330 

3340 



3360 

3370 

3380 

3390 

3400 

3410 

3420 

3430 

3440 

3450 



3480 

3490 

3500 

3510 

3520 

3530 

3540 

3550 

3560 

3570 

3580 

3590 

3600 

3610 

3620 

3630 

3640 

3650 

3660 

3670 

3690 

3700 

3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

3790 

3800 

3810 

3820 

3830 

3840 

3860 

3870 

3880 

3890 

3900 

3910 

3920 

3930 



DATA BBOB , BBBB , BBBB , BBBB , BBBB , BBBB , BBBB , BOBB 
DATA BBOO , BBBB , BBBB , BBBB , BBBB , BBBB , BBBB , BOBB 
DATA BBOO , BBBB , BBBB , BBBB , BBBB , BBBB , BBBB , OOBB 
DATA 0000 , BBBB , BB2B , BBBB , BBBB , B2BB , BBBB , 0000 
DATA 0000 , BBOO , B2BB , BBBB , BBBB , BB2B , OOBB , 0000 
DATA 0000,0000, BBOO , BBBB , BBBB , OOBB ,0000,0000 
DATA 0000,0000 
’ UFOf«3 
DATA 50,32,20 

DATA FFOF , FFFF , FFFF , FFFF , FFFF , OOBO , 0000 , 0000 
DATA FF7F , FFFF , FFFF , FFFF , FBFF , OOBO , 0000 , 0000 
DATA FB7F , BBBB , BBBB , BFBB , BBFB , 6000 , 0000 , 0000 
DATA FB7F , 11B1 , 1 1 1 1 , FF1F , BOBB , OOFF , 0000 , 0000 
DATA FB7F , 1 1 B 1 , B7 1 1 , FFFF , FFFF , F9FF , 0000 , 0000 
DATA FB7F ,11B1,B71F, F7FF , 1F1 1 , F9FF , OOBO , 0000 
DATA FB7F, 1FB1 , B7FF , 7 1F1 , B1 1 1 , F9BF , 60B0 , 0000 
DATA FB7F , FFBF ,B7FB, 11F1 , BB1 1 , F9BB , OOBF, 7 BOO 
DATA FF7F , FBFF , B7BB , 1 1F1 , 1B1B , F9BB , OOBB , FB7F 
DATA FF7F , BBFB , B700 , 1 IFF , BBB1 , F9BB , 7FBB , FBFF 
DATA FB7F , OOBB ,B70F , FFFF , BBBB , F9BF , FFBF , FBF7 
DATA BB7B , OFOO , B7F0 , FFFF , FFFF , F9FF , FBBF , FBB7 
DATA 007B.F006, 7900, 9999, 9999, 9999, BIBB, FBB7 
DATA 0000, 0000, BBOO, BBBB, BBBB, BBBB, 11B1 ,FBB7 
DATA 0000 ,0000 ,0B00 , FBBF , 7FBB , B1FB , 1 1 1 1 , FBB7 
DATA 0000 , 0000 , OFOO , OOFO , FB7F , 1 1B1 , 1 1 1 1 , FBB7 
DATA 0000, 0000, F006 , 7F00 , B1FB , 1111, 1111, FBB7 
DATA 0000 , 0000 , 0000 , FF7F , FFFF , FFFF , FFFF , FBFF 
DATA 0000 , 0000 , 7F00 , FFFF , FFFF , FFFF , FFFF , FBFF 
DATA 0000, 0000, BBOB, BBBB , BBBB , BBBB , BBBB , BBBB 
DATA 0000,0000 

DATA 60,40,24 

DATA 0000,0000,0000, 0000 ,0000,4400,2202,2222,4422,4044 
DATA 0000, 0000, 0000, 0000, 0000, 4404, 4444, 4444, 4444, 6C44 
DATA 0000 , 0000,0000 , 0000 ,DDOO , 4444 , 4474 , 4444 , 4444 ,CC6C 
DATA 0000, 0000, 0000, 0D00.D4DD, 7744, 4777, 4474, 4644, CCCC 
DATA 0000, 0000, 0000, DODD, 4400, 4447, 7747, 4444, CC46, CCCC 
DATA 0000, 0000, 6D00, 0000, 4404, 4444, 4444, 6644, CCCC, COCC 
DATA 0000 , 0000 , 0000 , DDOD ,4444,4444,4444, CC6C , CCCC , CACC 
DATA 0000, 0000, 0000, 046D.BB4B, BBBB, B6BB, CCCC, CCCC, AACC 
DATA 0000 , 0000 , 0000 , 4D00 , BBBB , 7 57B , BC5B , CFCC , CCCC , AACC 
DATA 0000, 0000, 0000, BB04, 7 7B7, 5577, BCDB, CFCC, CCCC, AACC 
DATA 0000, 0000, 0000, B74B, 757 7, D155.BC1B, CFCC, CCCC, AACC 
DATA 0000, 0000, 0400, 77BB, 5575, 11D1 ,BC9B, CFCC, CCCC, AACC 
DATA 0000 , 0000 , 4B00 , 7 5B7 , D1 5 5 , 9911, BC9B , FFCC , CFCC , AAFC 
DATA 0000, 0000, BB04, 5577, U5D, 9999, BC9B.FCCC, CCCC, AAFC 
DATA 0000 , 0000 ,B74B , 5D7 5 , 991 1 , 9999 , BC9B , FCCF , CFCF , AAFC 
DATA 0000 , 0400 , 77BB , 1 1 5D , 99 19 , 9999 , BC9B , FFCF , CCFF , AACC 
DATA 0000 , 4B00 , 5DB7 ,1911,9999,9999, BCBB , CCCC , CCCC , COCC 
DATA 0 000 , BBO 4 , 1 1 7 D , 9 9 1 9 , 99 99 , BB9 9 , BCBB , CCCC , CCCC , COCC 
DATA 0000 , B74B , 19 1 1 , 9999 , 9B99 , BBBB ,CCBC , CCCC , COCC , OODO 
DATA 0400, 71BB, 9999, 9B99, BBBB, CCBB , CCCC , ODCC ,ODOO,OODO 
DATA 4B00 , 1 9B9 , 9999 , BBBB , CCBC , CCCC , OOCO , DOOD , DOOO , 0000 
DATA B1 04 , BB 1 9 , BBBB , CCCC , OOCC ,0000, 0000, 006D.00DD, 0000 
DATA BB4C , CCBB , CCCC , OOCO ,0000,0000,0000, ODOO , 0000 ,0000 
DATA CC6C , COCC ,0000,0000,0000,0000,0000, 6D00 , 0000 ,0000 
DATA 0000,0000 

’ tt£H 

DATA 61,40,24 

DATA 0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000, C006, 0000 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , 0600 , COCC , 0000 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , CC06 , CBCC , 0000 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , 0600 , CCCC , B2CC ,0020 
DATA 0000, 0000, 0000, 0000, 0000, 0000, 6C00, CCCC, C2CC, 0020 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , CF6C , CCCC, CBCC , 0022 
DATA 0000,0000,0000,0000,0000, 6C00 , CFCC , CCFC , CCCC ,0022 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , CCOD , CCCC , CCFC , CCFF , 20B2 
DATA 0000 , 0000 , 0000 , 0000 , 0000 , BC55 , CCCC , CCFC , FCFF , 22C2 
DATA 0000 , 0000 , 0000 , 0000 , 0500 , BC99 , CFCC , CCFC , FCCF , 2CCB 
DATA 0000, 0000, 0000, 0000, D905, BB99 , CFCC , CFFC , CCCC , CCCC 
DATA 0000, 0000, 0000, 0000, 995D, BB9B , CFCC , FFFF , CCCC , CCCC 
DATA 0000 , 0000 , 0000 , 5D00 , 9999 , BB9B , CFBC , CCFC , CCCC , BBBC 
DATA 0000 , 0000 , 0000 , 9905 , 9999 , BBBB , CCBC , CCCC , CBCB , DBCD 
DATA 0000 , 0000 , 0000 , 9959 , 9B99 , BBBB , CCBB , BCCC , BDBC , BODB 
DATA 0000 , 0000 , 5D00 , 9999 , BB99 , BBBB , CBCC , CBCB , DBCD , OOBO 
DATA 0000 , 0000 ,9905,9999, BBBB , CCBC , BCBC , BDBB , BODB , 0000 
DATA 0000 , 0500 , 99D9 , BB9B , CCBB , CBCB , BBCB , DBBD , OOBO , 0000 
DATA 0000 , 5B00 , 9B99 , BCBB , BCCC , BBBC , BDBB , BODB , 0000 , 0000 
DATA 0000 , 9905 , BB9B , CBCC , CBCB , BBBB , DBBD , OOBO , 0000 , 0000 
DATA 0500 , 9BD9 , CCBC , BCBC , BBBB , OOBB , B06B , 0000 , 0000 , 0000 
DATA 5900 , CC9B , CBCB , BBBB , BOBB , 0000 , 0000 , 0000 , 0000 , 0000 
DATA BCOC , BCCC , BBBB , BBBB , 0000 , 0000 , 0000 , 0000 , 0000 , 0000 
DATA CB6C , BBCB , BOBB , 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , 0000 
DATA 0000,0000 
’ 

DATA 70,40,32 

DATA 0000,0000,0000,0000,2202,2222,2222,2222,7722,0000 
DATA 0000, 0000, 0000, 0200, 22F2.F22F, 2222, 2222, BB7 7, 0000 
DATA 0000, 0000, 0000, 2F02 , FF22 , 22F2 , 8888, 7 788, BBBB, 00 10 
DATA 0000 , 0000 , 0200 , F222 , F22F , 28F2 , BBBB , BBBB , 1 IBB , 07 1 1 
DATA 0000 , 0000 , 2202 , 2F1F , F22F , 8B22 , BBBB , BBBB , 1 1 1 1 , 7A17 
DATA 0000,0200, 112 1, 2FF2.F222, BB28, 11B7, 1111 , 1711.AA7A 
DATA 0000,2102,1211 ,2222, 2222 ,BB8B, 7 1 1 1 , 111 1,7A17,AAAA 
DATA 0200, 2222,2222, 2222 , 2822 , BIBB , 1771, 1111 ,AA1F,AAAA 
DATA 2202 , 2022 , 2202 , 2222 , 8B22 , 1 IBB , 1 1 17 , 1 1 7 1 , AA1F , AAAA 
DATA 0000, OOAA, 2222, 2222, 2222, 17B1, 7111,1 117, AA1F, AAAA 
DATA AAOO, 0000, FFFF, FFFF, 2222, 1121, 1771, 7111, AA1F, AAAA 
DATA 0006, AAOO, BBBB , BBBB , 22B2 , 1122, 1111, 1111, AA1F, AAAA 
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3940 DATA 0000 
3950 DATA 0600 
3960 DATA 0000 
3970 DATA 0000 
3980 DATA 0000 
3990 DATA 0200 
4000 DATA 2700 
4010 DATA 7902 
4020 DATA AAFA 
4030 DATA 99B9 
4040 DATA BBOB 
4050 DATA 0000 
4060 DATA 0000 
4070 DATA 0000 
4080 DATA 0000 
4090 DATA 0000 
4100 DATA 
4110 DATA 0000 
4120 DATA 0000 
4130 DATA 0000 
4140 DATA 0000 
4150 ’ 

4160 DATA 80,8 
4170 DATA 0700 
4180 DATA 7700 
4190 DATA 7707 
4200 DATA 7777 
4210 DATA FFFF 
4220 DATA FFBF 
4230 DATA FFOB 
4240 DATA BFOO 
4250 DATA 0000 
4260 ' 

4270 DATA 81,8 ~ 
4280 DATA 0200 
4290 DATA 2207 
4300 DATA 2202 
4310 DATA 2722 
4320 DATA 2222 
4330 DATA 22B2 
4340 DATA 220F 
4350 DATA B200 
4360 DATA 0000 
4370 * HbO 
4380 DATA -1 



FFFF, FFFF 
AAAA 
, AAAA 
FFAA 




OOFO 

OOFF 

FOFF 

B888 

8B8B 

B0B8 

008B 

0000 



0020 

F022 

2022 

2222 

AA7A 

ABAA 

80AA 

OOAB 

0000 



AAFA 

AAFA 

AAFF 

AAAA 

AAAA 

9999 

BBBB 

BB22 

OOBB 

0000 



UXh2 




117 



SEGM : OFFS 
7000:0400 
7000:0410 
7000:0420 
7000:0430 
7000:0440 
7000:0450 
7000:0460 
7000:0470 
7000:0480 
7000:0490 
7000 : 04A0 
7000 : 04B0 
7000:0400 
7000 : 04D0 
7000 : 04E0 
7000 : 04F0 



+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 

04 OE OE 03 03 03 03 08-01 OF OB 06 03 00 00 00 

08 00 00 08 01 09 03 06-03 09 09 09 09 03 00 08 

01 00 03 06 03 00 00 00-00 00 08 08 01 09 03 06 

03 09 09 09 09 09 09 09-01 OB 03 06 03 02 00 OF 

OF OF OF OB 01 OB 02 08-04 02 02 02 02 02 02 OB 

01 OB 02 08 04 00 OB 00-00 03 02 OB 01 OB 02 08 

00 00 OB 00 00 03 02 0B-01 OB 02 07 OB OB OB OB 

OB 03 02 OB 01 OB 02 03-03 04 OB 04 03 03 02 OB 

01 OB 02 03 03 OE OB 03-03 03 02 OB 01 OB 02 03 

03 03 03 03 03 03 02 0B-01 OB 02 03 03 OE OE OE 

03 03 02 OB 01 OB 02 02-02 02 02 02 02 02 02 OB 

01 OB OB OB 02 05 05 05-02 OB OB OB 01 OB OB OB 

02 05 03 05 02 OB OB 0B-01 OB OB OB 02 05 05 05 

02 OB OB OB 01 OB 02 02-02 02 02 02 02 02 02 OB 

01 OB 02 03 03 03 03 03-03 03 02 OB 01 05 04 05 

04 04 03 03 03 03 02 0B-01 04 OD 05 OD 04 03 03 



3C 6F 5D 6A 28 6B 46 



5D 1C 66 



5D 6D 3A 5F 



3F 85 



30 

6B 

69 

4B 

5C 

55 



5D 



78 

65 

4C 

3F 



51 



■J7.K3 



SEGM 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 



OFFS 

0500 

0510 

0520 

0530 

0540 

0550 

0560 

0570 

0580 

0590 

05A0 



VSUM 



+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 

03 03 02 OB 01 04 05 05-05 04 

01 04 OD 05 OD 04 04 03-03 03 

05 04 04 03 03 03 02 OB-OD 00 

00 00 05 05 01 00 05 04-00 00 

01 00 05 04 00 03 00 04-04 00 

00 02 00 00 04 00 05 03-01 05 

00 00 05 03 01 05 00 00-00 02 

01 05 00 00 00 03 00 00-05 02 

04 04 00 00 05 02 03 03-01 05 

03 02 03 OB 01 OB 03 02-05 05 

01 OB 03 02 03 03 03 03-03 02 

03 03 03 03 03 02 03 OB-OA OB 

03 02 OB OB OA OB OB 02-0F OB 

OA OC OB 02 OF OB 03 OB-OF 02 

03 OB 03 OB 03 02 OB OC-OA OC 

03 02 OB 10 OA 10 OB 02-02 02 



29 41 4F 57 49 50 45 4C 5C 42 



♦A +B +C +D +E 
04 03 03 03 02 

02 OB 01 04 04 

04 05 00 00 00 
08 00 00 00 05 

05 03 01 05 05 
00 03 .02 02 02 
00 00 00 05 05 

03 03 01 05 00 
05 05 05 05 00 
05 03 03 02 03 
03 OB OD OB 03 
03 02 03 03 03 
03 OB OF 02 OB 
OB OC OA OC OB 
OB 02 03 03 03 
02 02 02 02 OB 



45 4C 3E 40 44 



♦F 

OB 

05 

08 

05 



20 

ID 

20 

49 



03 

OC 

02 

03 



45 

8D 

96 

67 

6E 



5D 



88 



7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 



7000 

7000 

7000 

7000 

7000 



OFFS *0 +1 +2 +3 ♦ 
1000 20 00 08 00 0 
1010 00 00 00 00 0 
1020 00 00 00 00 0 
1030 00 00 00 00 0 
1040 00 00 00 00 0 
1050 BB 00 00 00 0 
1060 BB BB 00 00 0 
1070 BB 99 99 00 7 
1080 99 99 99 99 0 
1090 AA 7B B1 BB B 
10 AO 7B BB B1 BB 9 
10B0 BB BB B1 99 9 
10C0 BB BB 91 99 9 
10D0 BB 99 91 99 9 
10E0 99 99 91 99 0 
10F0 00 99 91 00 0 



3 +C +D +E +F 



0- 00 7B B 

1 - 11 11 1 



) 00 00 0 
3 00 00 0 
3 00 00 C 
3 00 00 0 



9 64 91 73 9 



SEGM: OFFS +0 +1 
7000:0600 OA 10 
7000:0610 02 OC 
7000:0620 02 OB 
7000:0630 OA OD 
7000:0640 02 OB 
7000:0650 02 OD 
7000:0660 OA 02 
7000:0670 02 02 
7000:0680 OD OD 
7000:0690 OA 02 
7000 : 06A0 OD OD 
7000 : 06B0 02 03 
7000 : 06C0 OA OD 
7000 : 06D0 03 OF 
7000 : 06E0 03 03 
7000 : 06F0 01 03 



♦ 2 +3 +4 -f 5 +6 
OB OB 02 OC 02 
02 OC 02 OB OB 
10 OB OA OB OB 
OB OB 02 OB 02 

02 OB 02 OB OD 
OD 02 OA 02 02 
OD OD OD OD 02 
02 02 02 02 02 
OD OD OA 02 OD 
02 02 02 02 02 
OD 05 02 03 03 

03 OB OA 02 02 
OD 02 05 05 05 
03 03 03 03 03 
03 02 01 03 03 
OF 05 06 OE 06 



0C-02 OB OB 10 OA 
10-0A OB 10 OB 02 
10-02 OB 02 OB 02 
0B-02 OB OB OD OA 
OD-OA 02 OD OD 02 
02-02 OD 02 OD 02 
OD-OD OD OD 02 OA 
02-0A 02 OD OD OD 
OD-OD OD OD OD OD 
02-02 02 02 OB OA 
OB-OA 02 05 OD OD 
02-02 02 02 02 02 
02-0D OD OD OD OA 
02-0D 03 03 03 OF 
0F-05 06 05 OF 03 
05-0F 03 03 02 01 



VSUM 5F 91 87 74 52 



52 89 7C 76 7F 



76 





7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 



♦0 +1 +2 +3 +4 
00 00 00 00 00 
00 00 00 00 00 
00 00 00 00 00 
00 00 00 00 00 
00 00 00 00 AA 
00 00 00 AA AA 
00 00 AA AA AA 
00 AA AA AA AA 




AA AA AA 00 00 
AA AA 00 00 00 
AA 00 00 00 00 
00 00 00 00 00 



+5 +6 +7 +8 +9 
00 00 00-00 00 
00 00 AA-AA 00 
00 AA AA-AA AA 




00 00 OO-AA AA 
00 00 00-00 AA 
00 00 00-00 00 
00 00 00-00 00 
00 00 00-00 00 
00 00 00-00 00 




VSUM FC FC is FC 04 FC 



02 A6 : 50 



7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 



0710 

0720 

0730 

0740 

0750 

0760 

0770 

0780 

0790 



7000 

7000 

7000 

7000 



07D0 

07E0 

07F0 



VSUM 




38 3A 35 21 2E 43 18 21 28 2C ID 39 33 27 27 24 :C1 
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119 




120 



AZON-VA 



090 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 



560 

570 

580 

590 

600 

610 

620 

630 

640 

650 



670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

790 



810 



830 

840 

850 

860 

870 

880 



900 

910 

920 

930 

940 



960 

970 

980 

990 

2000 

2010 



KEY 1, "WIDTH 80.25"+CHR$( 13) 
KEY 2, "SCREEN , 2"+CHR$( 13) 



CLEAR , &H7000 : DEFINT A-Z 

DEVICE=0 * DEV I CE= I £***:. i/a-f ! 

PALETTE MODE 2,2 

DEF FNC(G,R,B)=G*64+R*8+B 

PALETTE 

PALETTE 3, FNC<0, 2.01.1 

PALETTE 11. FNC(0, 0,01,1 

PALETTE 1 9 , FNC (3,5,01,1 

PALETTE 24, FNC10, 0,01,1 

PALETTE 25, FNC ( 1,1,11,1 

PALETTE 26, FNC (3, 3, 3) , 1 

PALETTE 27 , FNC (5, 5, 5) , 1 

PALETTE 28, FNC ( 2 ,0,0), 1 

PALETTE 29, FNC14, 0,01,1 

PALETTE 30 ,FNC(0 , 2,01.1 

PALETTE 3 1 , FNC (0,4,01.1 

CONSOLE ,,0: WIDTH 40,25: SCREEN ,0 

SPRITE SCREEN 1 

MOUSE 0: MOUSE 1,0, 0,0: MOUSE 3,0,20: MOUSE 3,1,20: MOUSE 
SCREEN WIDTH 4,320,4 ' #0 : 320*200*1 6c 

SPAN=384»7 

BUFFER #0, SPAN, 192,4 

SCREEN WINDOWS #0,(0,01,200,0 

BUFFER=0 

'OUT &H1 00 , INP( &H1 00 1 OR &H40 ' £ SESSfHfSAi* < tti 



WX=32: WY=8: S=4 

NB=( <WX*S+15)¥16)»WY*2+4: GB=NB¥2+1 
ALLNEED=GB*24»2 : BSLEN=ALLNEED*2 
DIM GGX< ALLNEED) 

SGM=VARPTR(GGX( 0 1 , 1 1 : OFS=VARPTR(GGX( 0 ) . 0 ) 
DEF SEG=SGM: BLOAD “ GROUND. P AT " ,OFS 



LOAD PATTERN "GAME. SPR" .ALL 

DEF SPRITE 1 AS 1 

DEF SPRITE 7 AS 10 

DEF SPRITE 8 AS 11 

DEF SPRITE 2 AS 12 

DEF SPRITE 3 AS 12 

DEF SPRITE 4 AS 12 

DEF SPRITE 5 AS 12 

DEF SPRITE 6 AS 13 



ON CL 
ON CL 
ON CL 
ON ( 
ON C 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
N CL 



ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL 
ON CL1 
CLIP ON 
GOTO *INT4 



GOSUB 
GOSUB *GM 
GOSUB *B1 
0) GOSUB «B2 
1 1 GOSUB *B3 

2) GOSUB «B4 

3) GOSUB “ 

4) GOSUB *B6 

5) GOSUB »B7 

6) GOSUB »B8 



1 GOSUB *T2 



23) GOSUB «T3.0 
24 1 GOSUB * 

25) GOSUB *T5.C 

26) GOSUB « 

27) GOSUB *T7.0FF 

28) GOSUB »T8.0FF 

29) GOSUB »T9.0FF 

30) GOSUB #T 1 0 . OFF 



OFF 



OFF 



TURN OFF 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF “““ 

TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR 
TURN OFF SPR] 

TURN OFF SPRITE 18: STOP SPRITE 
TURN OFF SPRITE 19: STOP SPRITE 
TURN OFF SPRITE 20: STOP SPRITE 



STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR I 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 
STOP SPR 



RETURN 
RETURN 
RETURN 
RETURN 
RETURN 
0: RETURN 
l: RETURN 
2: RETURN 
3: RETURN 
4: RETURN 
5: RETURN 
6: RETURN 
7: RETURN 
18: RETURN 
19: RETURN 
20: RETURN 



4,16,16.420,368 
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10 *T6 



2020 TURN 
2030 -T2, 

2040 TURN OFF SPRITE 22 
2050 «T3. 

2060 TURN OFF SPRITE 23 

2070 *T4. 

2080 TURN OFF SPRITE 24 
2090 *T5. 

2100 TURN OFF SPRITE 25 



OFF 



TURN OFF SPRITE 26 
2130 -T7.0FF 
2140 TURN OFF SPRITE 27 
2150 -T8. — 

2160 TURN OFF SPRITE 28 
2170 »T9. 

2180 TURN OFF SPRITE 29 

2190 -T 1 0 . OFF 

2200 TURN OFF SPRITE 30 



=0: RETURN 



2230 IF COLLISION! 0 ) >8 THEN RETURN 



2240 C 



2250 C 
2260 C 
2270 C 
2280 C 



C=COLLISION(2 



C.C=COLLISION(3 
C.C=COLLISION(4 
C.C=COLLISION(5 
C.C=COLLlSION( 1 
2290 RETURN 
2300 ' 

2310 -HITTING 
2320 IF XINGCC.C 
2330 BEEP 1 
2340 XING(C.C)=1 
2350 STOP SPRITE 



IF 20<C.C AND C.C<31 THEN AM.C*2: GOSUB -HITTING 
IF 20<C.C AND C . C< 3 1 THEN AM.C=3: GOSUB -HITTING 
IF 20<C.C AND C.C<31 THEN AM.C*4: GOSUB -HITTING 
IF 20<C.C AND C.C<31 THEN AM.C=5: GOSUB -HITTING 
IF C.C>8 THEN -BREAK 



THEN RETURN 



1.C: TURN OFF SPRITE AM.C’ Stf-OViS* 

2360 DEF SPRITE C.C AS 20: TURN ON SPRITE C.C' *&!£* 

2370 SPRITE C.C, "S40U4R4L4D4H800 , 800" , 1 : START SPRITE C.C 
2380 BEEP 0 

2390 SCORE*SCORE+ 1 : GOSUB -DSP. SCORE 

2400 BONUS=BONUS+ 1 : IF BONUS* 100 THEN BONUS=0: PLAYER*PLAYER+ 1 : LOCATE 39-PLAYER 
,24: PRINT PLAY "®7 T250 L16 07 CCC” 

2410 RETURN 
2420 ’ 

2430 -BREAK 

IF XING(C.C) THEN RETURN 



2450 VOICE REG 6 



20: VOICE REG 7.&HC7: 



V8CCCCC" , "V! 5C" , 

2460 DEF SPRITE 
2470 FOR T=0 TO 
2480 FOR T=0 TO 

2490 DEF SPRITE 

2500 PLAYER*PLAYER-1: IF PLAYER >0 THEN -MAIN.CONT 
2510 

2520 LOCATE 
2530 - 
2540 -I NT 4 
2550 DIM XING130) 

2560 DIM SPRI30) 

2570 DIM LIFE! 30 ) 

2580 1 

2590 OUT &H44.7: OUT &H45, INPI&H45) AND &H 
2600 CLS 
2610 ' 

2620 ' jt -i fc'-T'Jti.Qi I 

2630 ==================================== 

2640 -MAIN 
2650 DEF SEG=8H7000 
2660 GOSUB -DRAW. MAP 

2670 SCORE* 0 : ROUND*!: PLAYER* 3: BONUS*0 
2680 • 



Y 82, , , , "S1T100L32 V15CC V12CC V10CC 



VI5C" 

AS 20: SPRITE 1 , "S500L20R20L10U10D30L20R20L10" : START SPRITE 
0000: NEXT: TURN OFF SPRITE 1 
0000: NEXT: STOP SPRITE: TURN OFF SPRITE 



: PRINT "GAME OVER”: RETURN -MAIN 



2690 LOCATE 0,15: PRINT TAB (39): LOCATE 17,15: PRINT "DEMO": GOSUB -DEMO 

2700 -MAIN.CONT 

2710 DIST=0 : X=230: Y=204 

2720 ROLL TO (0,0): ROLL ,-192 

2730 TURN ON SPRITE 1: TURN ON SPRITE 7 

2740 MOUSE 1,200,200,0 

2750 CLS: PRINT "SCORE": GOSUB -DSP. SCORE 
2760 LOCATE 0.1: PRINT "ROUND" ; ROUND: 

2770 FOR T = 1 TO PLAYER-1: LOCATE 38-T.24: PRINT NEXT 

2780 '- -r 

2790 -MAIN. START 

2800 RESTORE -STAGE 1 : READ TIMING: DIST=0 

2810 LOCATE SPRITE l.X.Y: LOCATE SPRITE 7,Xtl80,Y 

2820 • 

2830 WHILE DIST/2<SPAN 
2840 DELAY* I 00 
2850 ROLL -1,1 

2860 GOSUB -MOVE 

2870 IF COLLISION!-! ) THEN GOSUB »*?? 

2880 FOR T=0 TO DELAY: NEXT 
2890 GOSUB -MOVE 

2900 ' 

2910 DELAY* 100 

2920 ROLL 0.1 

2930 IF COLLI SION! -1 ) THEN GOSUB *»3? 

2940 GOSUB -MOVE 

2950 DIST*DIST+4 

2960 IF DIST/8>TIMING THEN GOSUB -SET.CHR: READ TIMING: DELAY* 0 

2970 FOR T = 0 TO DELAY: NEXT 
2980 WEND 
2990 ' 

3000 -ROUND 

3010 IF G.ENEMIES<*0 THEN «5S7 
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ROUND=ROUND+i: LOCATE 5.1: PRINT ROUND; 



T SCORE; CHR$( 29) ; “000" ; 



"MISSION COMPLETE ! 



A. MI SI , *A.MIS2,*G.M 



3220 N=21 : WHILE N<30: IF SPRITE(N.l) THEN N=N+ 

3230 SPR(N)=NUM: LIFE(NUM)=N 
3240 LOCATE SPRITE N.LX.LY 

3250 ON SET. TYPE GOSUB *PRE1 , *PRE2 , *PRE3 , *PRE4 , 
PRE1 0 , *PRE1 1 

3260 TURN ON SPRITE N: START SPRITE N 



i: WEND: RETURN ’ 3! §15 L 
»PRE5 . *PRE6 , *PRE7 , *PRE8 , 



TE N. 500,0: SPRITE N. "C5S250M-640 , 320" : RETURN 
TE N, 630. 100: SPRITE N, "C5S300M-640 , 320" : RETURN 

N AS 30.31.32 

: SPRITE N, "C5S300M-640 , -320“ : RETURN 



0 #PRE3: DEF SPRITE N 



.0: SPRITE N , "C5S200M640 , 3 



: SPRITE N , "C5S300D300M-640 , -32 
0: SPRITE N , "C5S300L450M640 , 320 



THEN LOCATE SPRITE N, 0,300: SPRITE N, "S200M100.-50U200R640" : RETURN 

ELSE LOCATE SPRITE N. 50, 380: SPRITE N, "S200M100. -50R300U400" : RETURN 



: SPRITE N , "S200G0 , 200G320 , 300G650 , 0 



: DEF SPRITE N AS 60,61 
.. RNDUX.5 
THEN LOCATE SPRITE N. 500.0 



0NID150" : RETURN 



SPRITE N. 
: SPRITE h 



'S250C0N2L200N1 D1 50N2L200N1 D1 50N2L20 
. "S250C0N2L200N1 D1 50N2L200N 1 D1 50N2L2 



N , "S200T 1 T 1 T 1 T 1 T 1 G- 50 . 350 " : RETURN 



3500 *PRE8: DEF SPRITE N AS 50 
3510 IF SPRITE! 1,3) >300 

THEN LOCATE SPRITE N, 620, 200 
ELSE LOCATE SPRITE N. 320,0 
3520 SPRITE N . "C5S400T 1 S200G600 , 50G-50 , 350 “ : 



THEN LOCATE SPRITE N 
ELSE LOCATE SPRITE N 



00: SPRITE N 



400M-300 , 1 50PS600M400 , -200" : RETUR 
"S200M-300 , 1 50PS400M400 . -200 " : RET 



3680 READ Nl 



S350H630 . 1 00M-640 . 320 " : RETURN 
LIFE(NUM)*! 



: WHILE N<21: IF SPRITE(N.l) THEN N-N+l: WEND: RETURN ’ 2 £ 15 L 
N*LIFE(NUM) : FX=SPRITE( NN . 3 ) : FY«SPRITE(NN,4) 

EF SPRITE N AS 80: LOCATE SPRITE N.FX.FY 



3): Y1 =SPRITE( 1 , 



N SPRITE N: START SPRITE N 



: RETURN '2SI5L 



RETURN 



F SPRITEtN, 1 ) THEN N 



H: WEND: RETURN 

08-DIST: FY=GMY«1 6-GMX*l 6+DIST/2-4 
DEF SPRITE N AS 80: LOCATE SPRITE N.FX.FY 
XI =SPRITE( 1.3): Y1 =SPRITE( f, 4 ) 

TX=3*( XI -FX ) : TY=3*(Y1-FY)^20: S=100+INT(T 

SPRITE N."S=S;U20M=TX; ,=TY;H-50.0":TURN Of 



: START SPRITE N 



3940 RETURN 
3950 *G.MIS2 

3960 READ GMX , GMY ' * «Ltft8«T? 7®* 

3970 IF PEEK ( GMX* 1 2+GMY ) AND 128 THEN RETURN 

3980 N=9: WHILE N< 2 1 : IF SPRITE(N.l) THEN N=N+1: WEND: RETURN '3! £ ISO 

3990 FX=GMX*32+GMY*32+408-DIST: FY=GMY*16-GMX*16+DIST/2-4 

4000 DEF SPRITE N AS 81: LOCATE SPRITE N.FX.FY 

4010 SPRITE N,"S150U20TlTlTlH-50,0": TURN ON SPRITE N: START SPRITE N 

4020 RETURN 

4030 A*L SlttfJlIl 



4050 *MOVE 

4060 IF MOUSE! 2 , 1 ) THEN REP=0 ELSE IF REP=0 THEN REPM : GOSU 
4070 IF MOUSE (2.2) THEN GOSUB *GM .FIRE: DELAY=0 
4080 *MOVE2 

4090 IF DEVICE=0 THEN X=MOUSE(0): Y=MOUSE(l>: GOTO 4130 

1110 OUT &H44.&HE: D=255-INP( &H45 ) : IF D=0 THEN RETURN 

ON D GOSUB *J1 ,*J2,*J3,*J4,*J5.*J6,*J7,*J8,*J9,*J10 

LOCATE SPRITE 1,X,Y: LOCATE SPRITE 7.X+180.Y 
RETURN 

*Jl: IF Y<16 THEN RETURN ELSE Y=Y-10: RETURN 

IF Y>360 THEN RETURN ELSE Y=Y+10: RETURN 



4. FIRE: DELAY=0 



70 »J3 
80 *J4: 
90 *J5: 



IF X< 16 THEN RETURN ELSE X=X-10: RETURN 
IF X< 16 THEN *J1 ELSE IF Y<16 THEN *J4 
X=X-8 : Y=Y-4: RETURN 

IF X<16 THEN *J2 ELSE IF Y>360 THEN *J4 
X=X-8 : Y=Y+4 : RETURN 



4200 
4210 
4220 

4230 *J7 
4240 *J8: 

4250 *J9: 

4260 

4270 *J10 : 

4280 
4290 ' 

4300 

4310 * AM. FIRE 

4320 IF SPRITE(2,2)=0 THEN AM=2 

4330 IF SPRITE(3,2>=0 THEN AM= 

4340 IF SPRITE! 4 ,21=0 THEN AM= 

4350 IF SPRITE(5.2>=0 THEN AM= 

4360 RETURN 
4370 *FIRE 

4380 TURN ON SPRITE AM: LOCATE SPRITE 

ART SPRITE AM: RETURN 

4390 

4400 *GM.FIRE 

4410 IF SPRITE (6, 2) THEN RETURN 
1! (Y+4I/32+X/64 



IF X>430 THEN RETURN ELSE X=X+ 1 0 : RETURN 
IF X>430 THEN *J1 ELSE IF Y<16 THEN *J8 
X=X+8 : Y=Y-4 : RETURN 

IF X>430 THEN *J2 ELSE IF Y>360 THEN *J8 
X=X+8: Y=Y+4 : RETURN 



GOTO *FIRE 
GOTO *FIRE 
GOTO »FIRE 
GOTO *FIRE 



4.X+64, Y- I 6:SPRITE AM. "S800M640 . -320" : ST 



4420 GMY. OB J= I NT 
4430 GMX. OB J= I NT 
4440 TURN ON SPR 
00. 800” : START SPR 
4450 TURN ON SPR 
RITE 8 

4460 RETURN 



J THEN RETURN 



IF GMY . OBJ< 0 OR 1 
X+DIST*2-205 1/64-Y/32 ) 

TE 6: LOCATE SPRITE 6.X+64.Y+10: SPRITE 6 , "S500M60 , -20M50 , 1 0H8 
TE 6 

TE 8: LOCATE SPRITE 8.X+180.Y: SPRITE 8 , "S50M- 1 00 . 50” :START SP 



4470 ' 

4480 •JUKSS+MA'## 

4490 *GM.EXP 

4500 TURN OFF SPRITE 6: STOP SPRITE 6 

4510 TURN OFF SPRITE 8: STOP SPRITE 8 

4520 IF GMX.OBJ<0 THEN RETURN 
4530 GTYPE=PEEK ( GMX . OBJ* 1 2+GMY . OBJ ) 

4540 IF GTYPECU OR (GTYPE AND 128) THEN RETURN 

4550 VOICE REG 6,8: VOICE REG 7.&HC7: PLAY #2, , , , “S0T100L64 V15D R64 L30 V13C V 
12C V10C V8C” 

4560 GPX* ( GMX . OBJ+GMY . OBJ ) * 1 6 

4570 GPY= ( (GMY.OBJ+23- (GMX. OBJ MOD 241) MOD 24) *8 

4580 PUT ( GPX , GPY ) , GG% ( GB*34 ) , PSET , , , 1 

4590 IF GPY< 180 THEN GPY=GPY+8 ELSE GPY=0 

4600 PUT (GPX, GPY), GGX(GB*35), PSET,,, 1 

4610 G. ENEMIES=G. ENEMIES- 1 

4620 POKE (GMX. OBJ*12+GMY. OBJ), GTYPE OR 128 

4630 SCORE=SCORE+ I : GOSUB *DSP. SCORE 

4640 DELAY=0 : RETURN 

4650 ' 

4660 

4670 *DRAW.MAP 

4680 DEF SEG=4H7000 : BLOAD ” STAGE 1 . MAP" 

4690 ROLL TO (0,0): ROLL ,-100: LINE ( 0 , 0 ) - (SPAN, 199) , 1 2, BF 

4700 GXE=24*7- 1 3 : G.ENEMIES=0 

4710 FOR GX=0 TO GXE: FOR GY=0 TO 11 

4720 D=PEEK(GX*12+GY) : IF D=0 THEN 4780 ELSE D=D-1 

4730 IF 9<D AND D<16 THEN G . ENEM I ES=G . ENEM I ES+ 1 

4740 X= (GX+GY)*16: Y= ( (GY+23- (GX MOD 24)) MOD 24)*8 

4750 PUT ( X . Y ) , GG% ( GB*D*2 ) , PSET , , , 1 

4760 Y=Y+8: IF Y>191 THEN Y=0 

4770 PUT ( X , Y ) , GGX ( GB*D*2+GB ) , PSET , * , 1 

4780 NEXT: ROLL -8,16: NEXT 

4790 RETURN 

4800 ' 

4810 *DEMO 

4820 ROLL TO (0,0): ROLL ,-192 

4830 LOCATE SPRITE 1,230.204: TURN ON SPRITE 1 

4840 *DEM01 

4850 RESTORE *STAGE1 : READ TIMING: DIST=0 
4860 WHILE DIST/2<SPAN 

4870 IF MOUSE! 2, 1 ) THEN STOP SPRITE: TURN OFF SPRITE: RETURN 

4880 IF A=0 THEN AM: ROLL -1,1 ELSE A=0: ROLL 0,1 

4890 DIST=DIST+2 

4900 IF DIST/8>T1MING THEN GOSUB *SET.CHR: READ TIMING: GOTO 4920 
4910 FOR T=0 TO 200: NEXT 

4920 WEND: GOTO *DEM01 
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4930 

4940 i/i-Vt?-* 

4950 A 
4960 *STAGE1 
4970 DATA 20.3,1 
4980 DATA 21,3,2 
4990 DATA 30,3,3 
5000 DATA 31,3.4 

5010 DATA 35,11,5,39,-1,5,40,11,6,42,-1,5,43,-1,6,44,-1,5,45,-1,6 

5020 DATA 50,3,7 

5030 DATA 51,3,8 

5040 DATA 52,3,9 

5050 DATA 53,3,10 

5060 DATA 55,1,0,56,2,0,57.1,0.58,2.0,59,1,0,60,2,0.61,1,0,62,2,0 
5070 - 

5080 DATA 70,4,12,72,4,13,74,4,14,76,4,15 
5090 ’ 

5100 DATA 80,2,1 

5110 DATA 85,2,2 

5120 DATA 90,2,3 

5130 DATA 95,2,4 

5140 DATA 100,-3,23,6 

5150 DATA 105,-3,23,6 

5160 DATA 110,-3,23,8 

5170 DATA 120,6,1,122,6,2,124,6,3 

5180 DATA 126,6,1,128,6,2,130,6.3 

5190 ' 

5200 DATA 140,-3,30,4 
5210 DATA 141,-3,31,4 
5220 DATA 145,-3,30,10 
5230 DATA 146.-3,31,10 
5240 DATA 150,-3,30,4 
5250 DATA 151,-3,31,4 
5260 DATA 155,-3,30,10 
5270 DATA 156,-3,31,10 
5280 DATA 160,-3,30,4 
5290 DATA 161.-3,31,4 
5300 DATA 165,-3,30,10 
5310 DATA 166,-3,31,10 
5320 ’ 

5330 DATA 170,10,1,172,10,2,174,-1,1.176,-1,2,178,-1,1,178,-1,2 
5340 ' 

5350 DATA 180.8,1.181,5,0,182.6,0,183,6,0,184,6.0,185.6,0,186.6,0,187,6.0 
5360 DATA 192,9.2,195,9,3 

5370 DATA 185,-1,1,187,-1,1,189,-1,1,190,-2,2,192,-2,3,194.-2,2 
5380 • 

5390 DATA 220,6,0,223.6,0,225,6,0,230,6.0 

5400 DATA 236, -3, 60, 5, -0.-3, 59, 6. -0,-3, 58, 7, -0,-3, 57, 8, -0,-3, 56, 9 
5410 DATA 240. -3, 60, 5, -0,-3, 59, 6, -0,-3, 58, 7, -0,-3, 57, 8, -0,-3, 56, 9 
5420 DATA 245,5,0.-0,4,0 

5430 DATA 250 , -3, 60 , 5 , -0 , -3 , 59, 6. -0 . -3, 58, 7 , -0 , -3, 57, 8, -0 , -3, 56, 9 

5440 DATA 260 . -3, 60 , 5 , -0 , -3 , 59, 6, -0 , -3, 58, 7 , -0 , -3, 57, 8 , -0 , -3, 56, 9 ■ 

5450 DATA 270 , -3, 60 , 5, -0 , -3, 59 , 6 , -0 , -3, 58, 7, -0 , -3, 57, 8 , -0 , -3, 56, 9 
5460 DATA -0 , -4 , 60 , 1 , -0 , -4 , 61 , 2 

5470 DATA 280 , -3 , 60 , 5 , -0 . -3, 59, 6 , -0 , -3, 58, 7 , -0 , -3, 57, 8, -0 , -3, 56, 9 
5480 ' 

5490 DATA 290.2.0,290,3,0,291,2,0,291,3.0,292,2,0.292.3,0,296,4,0 

5500 DATA 300,7,0,302,7,0,304,7,0,306,7,0 

5510 DATA 307,11,1,310,11,2,314,-1,1,315,11.3,0,-1.2 

5520 ' 

5530 DATA 316,-3,78,6,317,-3,78,8,318,-3,79,6,319,-3,79,8 

5540 DATA 324.-3.80,2,325.-3,81,1,326,-3,81,3.327.-3.82,2,327,-4.81,2 

5550 DATA 332,-3,83,5,0,-3,84,5,0,-3,82,6,0,-3,80,10 

5560 DATA 340,-3,85,5,341,-3,81,11,342,-3,85,6,343,-3,82,10 

5570 DATA 350,-4,78,6,351,-4,88,1,352,-4,78,6.353.-4,85,2,354,-4,79,8 

5580 DATA 360,10.1,361.10,2,362,4.3,363,4,4 

5590 DATA 370,-1,1,371,-1,2,372,-1,3,373,-1,4 

5600 DATA 380,-2,1.381.-2,2,382,-2,3,383,-2.4 

5610 DATA 390.5,0,391,5,0,392,5,0,393,5,0 

5620 DATA 400,-4,96,5,401,-3,90,7,402,-3,90,8,403,-3,90,9,404,-3,90,10 

5630 DATA 405.-4,98,5,406,-4,98,6,407,-4,98,7 

5640 DATA 450,-3,96,5.451,-4,98,5,452,-3,98,6,453,-4,98,7 

5650 DATA 455,3,1,456,2,2,457,3,3,458,2,4,459,3,5,460,2,6.461,3,7,462,2,8 

5660 DATA 464.6,0,465.5,0,466,6,0,467,5,0.468,6,0,469,5,0 

5670 DATA 470,10,0,472,4,0,473,10,0,474,4,0 

5680 DATA 475,1,1,476,6,0,477,1,2,478,6,0,478.1,3,479,6,0 

5690 ' 

5700 DATA 480,-3,123,4,484,-3,123,4,-0,-3,124,4,488,-3,123,4,-0,-3, 124,4 
5710 DATA 492,-3,123,4,494.-3,124,4 
5720 DATA 0,10.0 

5730 DATA 496,-3,123,4,00,-3,124,4,00,-3,123,8 
5740 DATA 0,10,0 

5750 DATA 500,-3,123,4,00,-3,123.8,00,-3,124.4,00,-3,124,8 

5760 DATA 510,-3,123,4,00,-3,123,8,00,-3,124,4,00,-3.124,8 

5770 DATA 520,-3,123,4,00,-3,123,8,00,-3,124,4,00,-3,124,8 

5780 DATA 540,-4,134,5,540,-4,134,7 

5790 DATA 545, 10,0,546,10,0,547, 10,0,548,10,0 

5800 ' 

5810 DATA 572,-3,145,5,0,-3,146,4 

5820 DATA 580,-3,145,5,581,-3,146,6,582.-3.146,4,583,-3,147,3,0,3,0 
5830 DATA 584,-3,145,5,585,-3,146,6,586.-3,146,4,587,-3,147,3,0,3,0 
5840 DATA 588,-3,148,2,589,-4,147,5,590,-3,147,7,591,-4,150,3,0,3,0 
5850 DATA 592,-4,150,3,593,-4,148,5,594,-4,150,4,595,-4,149,5,0,3,0 
5860 DATA 600,-3.149,1,601,-3,148,8,602,-3,147,3,603,-3,147,7,0,6,0 
5870 DATA 610,-3,150,0,611,-3,150,10,612,-3,151,1,613,-3,151,9,0,-4,150,3 
5880 DATA 614,-3,152,2,615,-3,152,8.616,-3,153,3,617,-3,153,7.0,-4,150,7 
5890 DATA 618.-3,154,4,619,-3,154,6,620,-3,155,5,621,-4,152.5 
5900 DATA 630,-3,148,2,631,-4,147,5,632,-3,147,7,633,-4,150,3,634,3,0 
5910 DATA 635,-4,150,3,636,-4,148,5,637,-4,150,4,638,-4,149,5,639,3,0 
5920 DATA 10000 

5930 •- 

5940 ' 

5950 ' 1 % 
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U3.M 



30 ■ ======== 

40 SCREEN 2.3 
50 CONSOLE 0.25.0.1 
60 WIDTH 80.20 
70 CLS 2 
80 DEFINT A-Z 

90 FIELD #1,255 AS RC$,1 AS DY$ 

00 DIM DAT$(43) ,N1 ( 199) ,N2( 199) ,P(41 .2) 

10 LINE! 4, 37)- ( 316,77) ,, B 
20 LINE14. 1171-1628, 317), ,B 
30 LINE(316,117)-(316,317) 

40 FOR 1=137 TO 297 STEP 20 
50 LINE14, 1 J-C628, 1 ) , , .&HAAAA 
1160 NEXT 

70 LINE (212, 1171-1212, 317), . , &HAAAA 
80 L I NE (528, 1 17)- (528,317) , , , &HAAAA 
90 PAINT (0,0>,CHR$(&H55)+CHR$(0> .7 
00 LINE! 4 . 20 )- ( 43, 36 ) , 0 , BF 
10 LINE! 576, 18)-(626,34) ,0,BF 
20 LINE (558, 38)- (626, 54) ,0,BF 
30 LI NE( 558 , 58 ) - ( 626 , 74 ) , 0 , BF 
40 LINE (0,337)- (639. 399) ,0,BF 
50 LINE! 4 , 1 00 ) - ( 50 , 1 15) . 0 ,BF 
60 LJNE(320 , 100 )- (366, 1 15) , 0 , BF 
70 FOR 1=1 TO 5 
80 READ A,A$ 

90 PUT(A,21 ) .KANJI (ASC(A$) ) ,OR 
00 PUT1A+1 ,21 ) .KANJI (ASC(A$) ) ,OR 
10 NEXT 

20 DATA 5, T, 13. i. 21, t, 28.1.35,e 
30 FOR 1=1 TO 3 
READ A, A$ 

PUT ( A , 20 ) , KAN J I ( ASC ( A$ ) ) . OR 
PUT ( A+ 1 , 20 ) , KAN J I ( ASC ( A$ ) ) . OR 
70 NEXT 

80 DATA 578, N. 586.0, 594. . 

90 FOR 1=1 TO 10 
00 READ A, A$ 

PUT(A, 101 ) .KANJI (ASC(A$) ) .OR 
PUTIA+l . 101 ) .KANJI ( ASC ( A$ ) ) .OR 
30 NEXT 

40 DATA 5, S, 13, 1. 20, d, 29, e, 41, A, 321. S, 329,1, 336, d, 345. e. 357, B 
50 SCREEN .0 

60 LOCATE 75. 1 : PRINT "000" 

70 LOCATE 70, 2: PRINT “00/00/00" 

80 LOCATE 70 , 3:PRINT "00:00:00" 

90 CONSOLE 17,3 
00 CLS 

10 PRINT "DATA DISK 7 DRIVE 1 c -0,7 
20 A$=INPUT$( 1 ) 

30 PRINT 

40 OPEN "casset.dat” AS #1 
L0F(l)/3 



60 N 



(=MAX 



570 FOR 1=0 TO 199 
580 N 1 ( I ) — I 

590 NEXT 

600 FOR 1=0 TO 41 
610 FOR J=0 TO 2 
620 READ P(I.J) 

630 NEXT 

640 DAT$( I )=STRING$(P( 1.2) , &HA0 ) 

650 NEXT 

660 DAT$( 42) =" 00 / 00 / 00 " 

670 DAT$(43 )="00 : 00 : 00" 

680 DATA 2.2.36,2,3,36,2,6,23.2.7.23,2,8.23,2,9.23,2.10.23,2,11,23.2.12.23 
690 DATA 2,13,23.2,14,23.2.15,23.28,6,10,28,7,10,28,8,10,28.9.10,28.10,10 
700 DATA 28.11,10,28,12.10.28,13.10,28,14,10,28,15,10,41.6,23,41,7,23,41,8,23 
710 DATA 41,9,23,41,10,23.41,11.23,41,12.23.41.13,23.41,14.23,41.15,23,67.6,10 
720 DATA 67,7,10,67,8,10,67,9,10.67.10,10,67,11.10,67,12,10,67.13,10.67,14,10 
730 DATA 67,15,10 
740 GOTO 2890 
750 *GET. 

760 GET #l.REC«3-2 
770 MID$(DAT*(42) 



8)=MID$(RC$, 1.8) 



780 MID$(DAT$(43) , 1 , 8 ) =MID$l RC$. 9 , 8 ) 

790 MI D$( DAT$( 0 ) , 1 . 36 ) =MID*( RC* . 1 7 . 36 ) 

M I D$ ( DAT$ ( 1 ) , 1 , 36 ) =M I D$ ( RC$ ,53,36) 

810 FOR 1=0 TO 9 

820 MI D$(DAT$( 1+121.1 . 10 )=MID$(RC$. 89+I«l 0 , 10 ) 
830 NEXT 

840 FOR 1=0 TO 5 

850 MID$(DAT$( I +32 ) . 1 . 1 0 ) =MI D$( RC$, 189+1*10, 10) 
860 NEXT 

870 GET #1,REC*3-1 
880 FOR 1=0 TO 3 
890 MID$(DAT$( 1+38) 

900 NEXT 

910 FOR 1=0 TO 8 
920 MID$(DAT$( 1+2) , 

930 N 



1,10>=MID$(RC*. 1+1*10, 10) 



, 23 ) =MI D$ ( RC$ ,41+1 *23 , 23 ) 



940 GET #1 , REC*3 

950 M1D$(DAT$( 1 1 ) , 1 , 23)=MID$(RC$, 1 , 23) 
960 FOR 1=1 TO 10 

970 M!D$(DAT$( 1+21 >. 1 , 23)=MID$(RC$, 1+ 
980 NEXT 
990 RETURN 
2000 *PUT. 

20 1 0 M I Dt ( RC$ , 1 , 255 ) =STR I NG» ( 255 , 8HA0 ) 
2020 MI D$( RC$ ,1,8) =DAT$( 42 ) 

2030 M I D$( RC$ ,9,8 ) =DAT$( 43 ) 

2040 MID$(RC$, 17,36)=DAT$(0 ) 

2050 MID$(RC$,53, 36)=DAT$( 1 ) 

2060 FOR 1=0 TO 9 
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MI D$(RC$, 89+1*10 , 1 0 )=DAT*( 1+12) 

NEXT 

FOR 1=0 TO 5 

MID$(RC$. 189+1*10 , 1 0 )=DAT$( 1+32) 

NEXT 

PUT #l,REC*3-2 

M I D$ ( RC* , 1 , 255 ) =STR I NG$ ( 255 , &HA0 ) 

FOR 1=0 TO 3 

MID$(RC$, 1+1*10, 10 )=DAT$( 1+38) 

NEXT 

FOR 1=0 TO 8 

MID*(RC$,41tI*23,23)=DAT*!It2) 

NEXT 

PUT #1,REC«3-1 

M I D$ ( RC$ , 1 , 255 ) =STR I NG$ ( 255 , &HA0 ) 
MID$(RC$,1,23)=DAT$(11) 

FOR 1=1 TO 10 

MID$(RC$. It I*23,23)=DAT*! 1+21 ) 

NEXT 

PUT #1,REC*3 

RETURN 

*INP. 

C=0 : X=0 

LOCATE PCC,0),P(C,1): PRINT DAT$(C): 

X* 1NSTR1 DATS ! C ) , CHR» < &HA0 )) - 1 
IF X<0 THEN X=LEN(DAT»(C)) 

LOCATE P!C.0)tX.P!C,l> 

I=ASC( INPUT$( 1 ) ) 

IF 1= 8 THEN 2830 

IF 1= 9 THEN RETURN 

IF 1= 11 THEN 2810 
IF 1= 12 THEN 2810 
IF 1= 13 THEN 2551 
IF I* 27 THEN RETURN 
IF 1= 28 THEN 2610 
IF I- 29 THEN 2650 
IF I- 30 THEN 2690 
IF 1= 31 THEN 2750 
IF 1=127 THEN 2520 

IF I< 32 OR X=LEN ( DAT$ CC)> THEN 2300 
MID$(DAT$(C) .Xtl , 1 )=CHR$( I ) 

IF X=LEN(DAT$(C) )-l THEN 2500 
GOTO 2300 

LOCATE P(C,0),P(C,1) : PRINT DAT$(C); 

GOTO 2550 
IF X>0 THEN 2300 
M1D$(DAT$(C) . X, 1 )=CHR$( &HA0 ) 

GOTO 2300 

IF C<2 THEN C=Ctl :GOTO 2300 
IF C=41 THEN C=0 :GOTO 2300 
IF C=21 THEN C=22:GOTO 2300 

IF (C-2)¥10=0 OR (C-2)¥10=2 THEN C*Ctl0:GOTO 2300 

C»C-9 

GOTO 2300 

IF C<2 THEN 2300 

IF 031 THEN C=C-30 :GOTO 2300 

C«Ctl0 

GOTO 2300 

IF C<2 THEN 2300 

IF C<12 THEN C=Ct30:GOTO 2300 

C=C-10 

GOTO 2300 

IF C=0 THEN C= 11: GOTO 2300 
IF C=12 THEN C= 1 : GOTO 2300 
IF C=22 THEN C=3l:G0T0 2300 
IF C=32 THEN C=41:G0T0 2300 
C-C-l 
GOTO 2300 

IF C=ll THEN C=0:GOTO 2300 
IF C=21 THEN C=0:GOTO 2300 
IF C=31 THEN C=22:GOTO 2300 
IF C=41 THEN C=32:GOTO 2300 



GOTO 2300 

IF C=0 THEN C=41 :GOTO 2300 
IF C=22 THEN C=21:G0T0 2300 
IF C<3 THEN C=C-l:GOTO 2300 

IF ( C— 2 ) ¥ 1 0= 0 OR (C-2)¥10=2 THEN C=C*9:G0T0 2300 

C*C-10 

GOTO 2300 

IF MAX>0 THEN N=0:GOTO 3040 
CLS 

PRINT "1 3)4yVV 4)7>95 ) 

POKE &HFBE9.&H1E 
POKE &HFBF0.&H1F 
A$=INPUT$( 1 ) 

ON INSTR!CHR*!&HlE)tCHR*!8,HlF)t" 12340" 



A$ ) GOTO 2970,3010,3140,3370,3490,37 



IF N<0 THEN N=0 :GOTO 2940 
GOTO 3040 
IF MAX=0 THEN 2940 



IF N>=NMX THEN N*NMX-l:GOTO 2940 
REC=N1 ( N I + 1 : GOSUB *GET. 

LOCATE 75. 1 :PRINT RIGHT*! "00"tMID*!STR*!Nl IN) t 1) .2) .3 > 
LOCATE 70. 2: PRINT DAT*(42) 

LOCATE 70, 3! PRINT DAT*<43) 

3080 LOCATE P!0,0),P^0,1):PRINT DAT*(0>; 

LOCATE P(1,0),P(I,I ): PRINT DAT*(1); 

FOR 1 = 2 TO 11 

LOCATE P( I ,0) ,P( I , 1 ): PRINT DAT*(1);“ " ; DAT$( 1+10): 

I DAT*! It 30); 
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3120 NEXT 
3130 GOTO 2900 
31 40 CLS 

3150 PRINT "DATA 9 V-Ol " 

3160 PRINT "»-'/».*- f' t-'Jl TAB*- f' »*□». ESC*- t* *299*5 

3170 MID$(DAT$(42) . 1 , 8)-DATE$ 

3180 MID»(DAT»(43),1,8)=TIME* 

3190 LOCATE 75.1:PRINT RIGHT$( "00"*MID$(STR$<MAX*1 1,21.3) 

3200 LOCATE 70.2:PRINT DAT$(42) 

3210 LOCATE 70.3:PRINT DAT$(43) 

3220 FOR 1=0 TO 41 

3230 MID$(DAT$( 1 ) , 1 , 23)=STRING$(P( I . 2) .&HA0 ) 

3240 LOCATE P( I .0 ) ,P( I . 1 ) : PRINT DAT$< I ) : 

3250 NEXT 
3260 GOSUB «1NP. 

3270 IF 1=27 THEN 3320 
3280 REC=MAX+ 1 
3290 GOSUB *PUT. 

3300 N=MAX 

3310 MAX=MAX+ 1 

3320 FOR 1=0 TO 199 

3330 N1 ( I )=I 

3340 NEXT 

3350 NMX=MAX 

3360 GOTO 3040 

3370 IF MAX=0 THEN 2940 

3380 CLS 

3390 PRINT “DATA 9 -\539 5-72." 

3400 PRINT "Jl-VA*- r* D-'Jl -0*9. TAB*- 9* »*□$, ESC*- r* hW'i 
3410 M1D$(DAT$(42) , 1 , 8)=DATE$ 

3420 MID$(DAT$(43) . 1 ,8)=TIME$ 

3430 LOCATE 70.2:PRINT DAT$(42) 

3440 LOCATE 70,3:PRINT DAT$(43> 

3450 GOSUB «INP. 

3460 IF 1=27 THEN 3320 
3470 GOSUB »PUT. 

3480 GOTO 3320 
3490 «PRT. 

3500 IF MAX=0 THEN 2940 
3510 CLS 

3520 PRINT "INDEX 9 PRINT OUT 5-72." 

3530 PRINT “7 "959 J S-*25t* V 9***9 TAB*- 9 *5999' 7*. ESC*- 9* 9 
3540 A$=INPUT$( 1 ) 

3550 IF A$=CHR$( 27 ) THEN 2900 
3560 IF A$< >CHR$(9) THEN 3540 
3570 PRINT 

3580 PRINT "*5-09 *29 r*X." 

3590 LPRINT 

3600 LPRINT “r":SPC(39);"i" 

3610 LPRINT 

3620 LPRINT " Side A Side B“ 

3630 LPRINT * 

3640 FOR 1*0 TO 9 

3650 LPRINT " " ;LEFT*(DAT$( 1*21 . 19) 1 " " :LEFT$(DAT$< 1+22) ,19) 
3660 NEXT 
3670 LPRINT 
3680 LPRINT 

3690 LPRINT " h" ;SPC<39) 1 ”4 " 

3700 LPRINT " No. “ 1 LEFT$(DAT$< 0 ) . 35) 

3710 LPRINT " ";RIGHT$("00"*MID$(STR$(REC).2),3);" “;LEFT$(DAT$( 
3720 LPRINT " F" I SPC ( 39 ) 1 "4 " 

3730 LPRINT ” DATE ";DAT$(42);" TIME n ;DAT$(43) 

3740 LPRINT “ SOURCE BIAS EQ " 

3750 LPRINT " NR IN O OUT 0” 

3760 LPRINT * STEREO 0 MONO □“ 

3770 LPRINT " L " :SPC(39) I " J * 

3780 GOTO 2900 

3790 IF MAX-0 THEN 2940 

3800 CLS 

3810 PRINT "DATA 9 75*9 5-72. " 

3820 IF MAX=NMX THEN 3930 

3830 PRINT 't!'5»-f / 75*9 7-stfl 9 2939 = i-7X>l7 (Y/N) : “i 
3840 ON INSTRC yY5nN5" , INPUT»( 1 ) >*3 GOTO 3920.3860 
3850 GOTO 3840 
3860 PRINT "No" 

3870 FOR 1=0 TO 199 
3880 N1 ( I )=I 
3890 NEXT 
3900 NMX=MAX 
3910 GOTO 3930 
3920 PRINT “Yes" 

3930 LINE INPUT "75*9 XI KEYWORD A? : ":K$ 

3940 NN=0 

3950 FOR 1=0 TO NMX-1 
3960 REC=N1 ( I ) + 1 
3970 FOR J=0 TO 2 
3980 GET #1.REC*3-J 

3990 IF I NSTR(RC$. K$ ) THEN N2(NN)=I :NN=NN+1 : J=3 

4000 NEXT 
4010 NEXT 

4020 FOR 1=0 TO NN-1 
4030 N1(I)=N2(I) 

4040 NEXT 
4050 NMX-NN 
4060 N=0 
4070 GOTO 3040 
4080 CLOSE 
4090 CLS 

4100 PRINT "5-29939 5-rt *-fr*XJ)7 (Y/N) : ": 

4110 ON INSTRC yY5nNS'\ INPUTS! 1>>¥3 GOTO 4130.2900 
4120 GOTO 4110 
4130 PRINT "Yes" 

4140 CONSOLE 0.25 
4150 END 
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A »> it®f, < 

5«:L-C< A'Si% 

t U I'O T <> ft A A* } *j£¥# A c. If* 
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-5Tfa<-s§A'oAA*-j ttS^AA'c 
t i-»ft0;fe/'t>0Kft i. 

i'*»i:iJt®«tittlSft*#ii’oTi, k* 
^t**ilft7x*i:tetmiAi Mt/io t 
;f*H«. i’ < 6 ^a 4 *^nTfc«i:* 
*’Al' 1 5 15, fcfcl\ v- xi#i:frUA 
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ayr-Ai:|,t*HA. ;nAf. (« 
i:BK«A<) t£'I> L T, *'-K-x0* 
LSASfcb? ; iVXZi-to 

2-3-Tfti 0^*/ #c,c.-„ 
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Mtt/V— K 0±7 
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® PC-8800 7 ') -x'®'*y n >**£ 

®7 a 7 tf- K 7 4 7' (*£ 1 £**) 
©ty-r'.f x7v/f (ffiHMfc#fiT) 

* yu y=>ur> 

®7 *--*? h LA7 b - 7 kf— A lftffl 



ELiT 

©DISK-BASIC A®®) Li to ^07" 
-A 1 * VK-K-rfM&lit 
®y 7 h A AA^I L t-t— 7' Lit 
SAVE ’’BOAT”© 
iAtlLX < A'Si' 

®!) X h B lit*- h 04fV 7 7^7^- 
7 t*T 
MON© 

-r-7^7lf^-74-e»)L-C, 

h] 

EBC00©(BC00#Hfe*- 
AA*Lit 
©y X h B^A^LA?,, 

STOP t-Aff L, #1/ 

?<xAC>, 

CTRL+B A If L t BASIC i: 
b £ •> ito Ut, 

BSAVE ”B”, &HBC00, &H2400© 
ttx|. B5r77^^”B”f-t- 
7*L i t 

®y X b C I ism, X3L ^©t'-^ 
ft 

y x h B tl5)«i:v^>|§^^7 4- 

^UL-C, 

EBCOO© 

f BC00#M*> e, A* Ate* i t 

®y X h C©A*a J &fc^AC., 

BSAVE ”C”, &HBC00, &H1760 © 
mhc^77i^« ”C”f -t - 
7*L it 
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9*><om^xt. y x h b immc--? 

EBD20© 

1 T BD20»*‘ c, A Jj iritis® it 
®y x h 

BSAVE ”D”, &HBD20, &HD20 © 
X) X FD^7r^«”D”-ft- 
fl At 

®y X 4 'yt'a'fyU 

comtxt. y x h b t n*i: -? ^ >m 

ECBOO© 

X CBOOSifea* it 

®y X k EOAiji'^oA-c,, 

BSAVE ”E”, &HCB00, &H8B0 © 
X V XYE*7T4X'% ”E” X-t- 
7 ' Li t. znxAfiimjxt 
©y x h fciyjai'* < aaji-ci'*©* 
mmitzc,, 

RUN ’’BOAT”© 

xr-^mtext 

7|t-SL s-X<DJl-)b 

• 

3 0*'- h w-xli 6 h SAXXliMl 
i- f. 

to 

n-xii 1 moos — h^X, Z(D=t- x 
4r 3 «*■ t 5 « L -OBttfr** Lit. 
i^-xlASrlOi'-x-r 1~5 v--x|A 
r 51l»iSSj (±tt 2 t S X 4 4 ® 

•r, i*t 2#©iii#* ? An®^o-ct.'-c 

4 OK) 01,200;*- — X (3-xjr 
3®), 6~10w-XlA (1#, 

2#®)ii#* t iEL < &bU < tlAt*) ® 

2,000;*- h^v- 7 (a-xS>5®) -r 

to 

h U tz I rn% k 1£ -3tlfi5rfg Lit. 
**JJ0f* *> & IA500 , 0000 (//) o § ^ - x 3r 
k 1: 5 ftSO^F** At SZti'fHt 
75-, f-xtzfcotJi&IA 

r fi^j Srl-cr-AfcMitSZ k^tS 
it. 

• 

J*fE75& 

itJ ffgtfil' i 
t 
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tzt' L, r 3 - 3 j ©i 5 i:|5]L'#^-?f 
ttSt* 3 klAfS it A. 
®ori:^0ffiA-g-6ti:i' < c,oriit\ 
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ftit 

®ft* f i'i 0 ^^»#T'to 

TCS^Sftito 

aAL^i'ki'itii '3 ktt. r sn# 

(:o*‘tj 0 &i.tt-y, 10 , 000,0000 
A^±0^fi0^SSIA, h S 

ft5 3krt. L*'L10,000,000RA7± 

0«A4#9ISSft*0fi 

ki'7 3 k*>4 LftitA 
3 5 LT, ifc*v-xrki:®*‘4*l 
yiiL i to 

• 

4J-lv-xiAtt0li, tztS^fri 



fcl fti>ft**aL** 
tO-Tli* 0 *-£*,„ ^liO, 
ufgLfci'io. t5ra»<iur qt 
-eft <* c t c t> ft *> *•* * t /u 
Kf, tf-hi— a©****#*.** 

* Lfc. 

CHECK 1 
BS^^xw^ti-cfc/ 

^«©a38fcft4©li, ftA.fc<,'o-Ct> 

r »*. j ft. 30 %©#^©^- h t, so 

%©®Mg©*'- h/'t, 

il*. »*©#i’)«*i:>if-h«r*-er 
*ito Ut, i$* ! lfgCi|l'n- 

* am t 2 #@c^ 

i'3-x am zma. 

-Cfri Li 5. t LC02o©P$*5|J*> 

©3-xc< (fc 

fcilf, ±2o*»50%, £©ftk(i3O%n0 
t $ ft£) It, Z<D2te* t l, 2ti:A5 
4*» it. t < c*» 
as©v-^©m £*> itn%-ct , s 
fc x*rt i't i 

to 

CHECK 2 

t L4^ft'ft5i»< , llti'tf £ A. c D0H 
< ^fci'5 t »B, 
jg o i to 

fcfcJU*. 2a-x**E«W«:»<, li 
i-Oa-xttRlEJ: 9ft»*©«£>(:|*, 
r 2 - 1 j, r 2 - 3 j, r 2 - 4 j, r 2 - 5 j, r 2 
-6jt*Ar*i Li 5o «*t*«tt* 
<ft<>, i 1 iC,f4oa/v/vitii, jU 
Ka* f omjr. tA.tn<Ditftt-n>i>>) t 

V/vo 

CHECK 3 

■c*<murft6«ci'©r, afc&uti'v 
-*ft 0 -ri> t &© 

t* ? , 

5o 

^Bxttqou, r *<r-*faj, r ma 
fc-tf. fcfc 

A If, 2^**1 3 — X, Mt»L**5 3 — X© 

*■&■. r l-5j, r 5-l j-rilc^ito :ft 



ft 6, *«■ t L , a-CS 
c t* f r§> 4 to 

CHECK 4 

troo^on 

1 1:** < Uw-x^v-xHfttft < -cii 
WJ4i'^H'iti , ) KCiV'-x 
4*A. t< 

cr©3~x©wit*fc&uri : Lfti>k 

SI*. .©».'■$) o TB# It I Li 5» 

t LT, C-9t 

Utlttsorto 

**■& <*©**, ffl^Lfti'^a-rto 

CHECK 5 

yyjlsiz r M%tj 

i ' t i -cisM^smt & umztafr i i 

L t*» 1 1' 5 ; t ft 

Stifti'i 5 Co **r. < XiM- 

A-t* t> ft /• i i> 5 ; t 

fc i < *>& z t-Tto 4r-rv^n:*ftWli 



h 0 i*A. 

S9M1 

r =MHr*K»Ll'ffl;lj ttHLfc 
* f , «#®;te«CHi:##*2o*»t6 fc 
£©Sili®< ft 0, JBtttfT*** i fc* f £ 
5xrtoie>m&l*, r 2-ljj3-2j, 
r 2-4j, r 5-2j, r 2-6j ttScS, LTiittf 
i Li 5o 

tt'LMSOv'-x©^, rtio 
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100 • *'-b u-^ 

110 BLOAD "B" , 8.H1 000 
120 BLOAD "C" , &H3C00 
130 BLOAD "D" 

140 BLOAD "E" 

150 DEF USR1 =&HC000 
160 I =USR1 ( I ) 

170 END 
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C0F0 00 07 FF 00 0 



C 0A 26 A0 :D0 
C fD *E *F : SUM 



0 3E 0F FI 00 3E 01 



C1F0 00 83 FF F8 00 01 



9 CB 56 44 05 1! 



ADDR *0 ♦! *2 ♦: 



C2D0 82 0F FF F8 01 78 3F F8 21 E3 8F F0 8F FF E7 F0 : 
C2F0 9F E0 FC 90 C7 FF E8 00 11 FF 00 4C 91 38 88 00 : 



F F0 8F FF FF FI 



F CF 00 43 BF CF 00 33 FF IF 88 01 F8 7E 02 j! 



F E9 13 FF FF F0 41 FF FI 



F F8 3F IF 3F E3 8F 9F FF 87 C7 9F :A1 
F E3 FC IF 01 F8 FF 9D 00 0F FF E8 :2E 



8 0E 61 00 1C 03 E0 0 



M D3 01 75 A1 BB AB 77 FB 1 1 






D FD F8 8F FE FB F< 



F FF 08 81 FF FE 01 
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23 :( 



> 




D 1 00 00 00 00 18 00 00 08 00 00 0? 00 03 00 0F FF E0 : f 2^ 

D120 3F FF FF FF 07 FF FF FE 00 FF FF FF 00 0F FF El : 2B 
D130 00 00 00 00 00 00 10 06 00 00 00 40 00 00 10 02 : 68 
D140 00 00 00 18 00 00 08 00 00 01 00 03 00 0F FF E0 : 12 




D1E0 0F FF FF 80 0F FF FF 00 ?F FF FC 04 ?F FF F0 00 :C6 
D1F0 IF FF 01 00 IF E0 00 00 IE 0000 00 00 00 00 00 : 3C 



VSUM 7F FE F6 







F FC IF 80 0F E0 7 



C0 : 2E 




VSUM D3 DC 5C 



: FE 



VSUM A5 D2 8D 21 




VSUM 09 61 EA ED C4 C7 E7 7D C2 55 99 3D B6 17 7F58~:ci 




VSUM 79 46 19 F2 D0 7B D5 5F 02 Fc’43 _ 6D~78~Bc"82’b0’ : 5D~ 












D050 IF FF F0 41 IF FF FC 00 0F FF FF 06 0F FF FF 80 : 09 
D060 47 FF FF E3 03 FF FF F0 41 FF FF F8 00 FF FF FE : 4C 



ADDR *9 ♦! *2 *3 *4 +5 +6 +7 *8 *9 +A *B +C *D *E fF :SUM 

D400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 : 00 

D410 00 00 00 00 0E IF F8 00 0E 1C 38 00 0E 1C 38 00 : E9 

D420 0F FC 38 00 07 F8 38 00 00 00 00 00 00 00 00 00 :7A 




VSUM 2C 78 0B F8 3C 3C 7C 80 IF 06 CC F8 09 07 BA FE :CC 








D0F0 04 0F E3 C0 00 07 00 01 10 00 00 00 00 10 00 88 : 66 

VSUM 28 96 5C 6B 80 72 74 09 6E 21 B8 02 61 41 32 DE :EF 
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VSUM FB FC FA FA FA F7 7A FA FB FA 7B FB F9 FB 7A FA : 23 






C1E0 80 00 00 01 80 00 00 01 80 00 00 01 C0 00 00 03 : 46 
C1F0 F0 00 00 07 F8 00 00 IF FE 00 00 7F FF FF FF FF :87 











ADDR *0 ♦! ♦ 2 
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VSUM 2C 53 55 E0 4A ifc B0 87 07 4B EF 79 3F A7 3A BF 



SUM 

DD 



4D 




VSUM 2E 9D 6E E8 D6 16 25 FD 28 5D 10 EF 92 8A C4 02 : 95 





•J7.K© 



CF50 00 00 00 00 00 IF D2 00 30 49 00 E0 89 01 

CF60 00 03 00 00 0E 00 00 00 00 00 00 00 00 0| 

CF6 0 03 S c 5° 5S ?o !! SS rp Y/ Iv 0 

CFA0 00 46 00 01 87 C0 07 06 70 39 C6 1C E0 El 

CFB0 00 00 00 00 00 00 00 00 00 00 00 00 00 0| 

CFC0 00 00 00 00 00 00 00 00 00 00 00 00 00 0| 

cff0 ff ll ii ll i? II ^ ll ^ ll ^ ll % g 




VSUM 91 CA 31 50 DF 00 BE BE DA 47 00 C7 F9 AD C2 5E 




VSUM 



32 9E DA 83 00 D8 40 86 : 4D 



C030 90 Se « ?7 Sd ^ ra SI ^2 





5 6F 71 23 73 23 7: 



8 C5 CD 61 C5 F 



4 30 FB 25 C6 0A 6F E5 1 



D CE Cl 3E 30 14 CD CE C! 



4 CB DE C9 21 5D C 
4 CB 9E 21 69 C4 Cl 



3 3E 09 C9 FE :5B 



1 02 11 15 F2 CD 37 BE :B4 



C650 11 C9 F3 ED B0 3E 39 D3 3! 



1 15 0E 09 06 12 E5 C 1 



6 0E 30 01 24 6F 0 



•0 C2 A0 C7 78 CB 27 Cl 









C2B0 CB 3F CB 3F 0E 01 CD 37 BE FI E6 0F 
C2C0 BE 3A IB BF F5 CB 3F CB 3F CB 3F CB 
C2D0 37 BE FI E6 0F 0E 01 CD 37 BE AF 0E 



VSUM 96 2E 



26 7B 




4F : 69 



BE : 2C 





C8C0 36 08 3E 07 90 12 3D CB 27 CB 27 CB 27 CB 27 C6 : F0 
C8D0 03 6F 36 F0 1C El 7D C6 10 6F 18 D5 3E 19 01 03 : 9F 
C8E0 04 11 83 FA CD 37 BE 21 64 90 7E A7 28 08 01 01 :C0 
C8F0 02 E5 CD 37 BE El 2C 7D FE 68 20 EE DD CB 00 9E : ED 
C900 DD CB 00 C6 C9 11 73 F6 3E 15 01 03 02 CD 37 BE :CC 
C910 3A A6 90 01 01 01 CD 37 BE DD CB 00 B6 C9 21 6B : E8 

VSUM 19 4E A8 FD 45 8A 6F 15 8E DD EC 29 0F 39 2E E6 S 3B 








57 05 28 
8F 90 7E 
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CA20 CB 01 FE 18 0D 2C 7E FE 06 28 07 34 DD CB FE :A7 M 




CA60 00 00 00 00 00 05 03 03 03 03 03 03 03 03 03 02 :22 


CA90 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 :0e 
CAA0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 :04 
CAB0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ; 00 

CAD0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ; 00 
CAF0 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ; 00 
CB00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 : 04 
CBI0 00 00. 00 00 00 00 00 00 00 00 00 00 00 00 00 00 :00 


VSUM E6 04 C4 IB DB 34 84 04 0C 30 0A 37 E0 CE 04 14 :A3 


U7.hH 

ADDR .0 *1 +2 *3 +4 *5 *6 *7 .8 *9 *A «B *C *D *E *F :SUM 

CB00 21 9B 90 36 FF 2C 7E A7 20 49 21 9B 90 34 7E FE :37 

CB10 06 D2 60 CF CD 47 CB E5 2C 16 00 5E D5 3A 6A 90 :74 

CB20 47 3E 0C 90 21 00 00 06 04 0F 30 01 19 EB 29 EB :A4 

CB30 10 F7 29 29 7C D1 El FE 0D 30 CF 7E 83 77 30 CA : 03 

CB40 2D 2D 2D 2D 34 18 C3 CB 27 CB 27 CB 27 CB 27 C6 : 51 

CB50 04 6F C9 2E 77 2C E5 7D FE 7E 20 04 El C3 3C CF : BE 

CB60 7E 3D CD 47 CB 7E 2C 46 80 2D 77 3A 9B 90 3C 32 :81 

CB70 9B 90 38 10 2D 2D CB 46 C2 80 CB CB C6 El 18 D5 : 4A 

CB80 CB 86 2C 2C 2D 7E FE 08 30 F3 2D 2D 2D FE 00 C2 :C4 

CB90 2C CC 7E 57 FE 05 20 14 14 2C 7E FE 09 20 03 3C :28 

CBA0 18 05 FE 0A 20 01 3D 77 2D 72 18 D1 FE 18 20 23 :DB 

CBB0 14 2C 7E FE 0A 20 03 5F 18 2E FE 0B 20 03 3D 18 :0F 

CBC0 F6 FE 0C 20 0A 2C 2C 36 01 2D 2D 2D 72 18 AE 2D :A5 

CBD0 72 18 AA FE 17 20 05 14 72 C3 7D CB FE 19 20 2D :63 

CBE0 2C 7E FE 08 20 14 5F 14 2C 2C 36 01 2D 2D CD 78 :85 

CBF0 CC 30 01 1C 73 2D 72 C3 7D CB FE 09 20 03 3D 18 :B5 


CF20 37 BE C3 7D CB FE 08 20 04 3C C3 2A CD FE 09 20 :47 

CF30 03 C3 EE CB FE 0A 28 AA FE 0B 28 A6 21 80 90 7E :DF 

CF50 0F 0F 0F B9 20 0A D6 E * ^ 89 28 14 3A 78 90 0F :3B 

CF70 A7 90 01 01 01 CD 37 BE DD CB 00 BE 3E 30 01 02 :D3 

CF80 04 11 14 E3 CD 37 BE 7B C6 05 5F 3A A6 90 0E 01 :F2 

CFA0 37 BE 06 26 21 A6 90 3A 6E 90 A7 20 0D 06 24 56 : 04 

CFB0 2C 7E BA 2D 30 04 2C 72 2D 77 78 01 02 06 11 14 :AD 

CFC0 E8 E5 CD 37 BE El 7E 07 07 07 07 2C 56 82 32 AB : EB 

CFE0 0E 00 26 00 D6 64 0C 30 FB 0D C6 64 D6 0A 24 30 : 10 

CFF0 FB 25 C6 0A 6F 79 01 01 06 1 1 IF E8 E5 CD 37 BE :9F 

VSUM F8 0D E2 7D 03 77 50 53 84 47 80 28 0C 50 8D B3 :90 

ADDR «0 ♦ ! *2 *3 *4 *5 *6 *7 *8 *9 «A *B *C «D «E *F :SUM 

0000 El 7C 0E 01 E5 CD 37 BE El 7D 0E 01 CD 37 BE AF :F1 

D010 0E 01 CD 37 BE AF 0E 01 CD 37 BE CD F2 C5 CD 5D IFF 

D020 BD 0E 02 3A 6E 90 A7 28 02 0E 01 3A AB 90 21 80 : FB 

D030 90 06 05 56 BA 28 24 2C 2C 2C 05 20 F6 0D 0F 0F :C1 

D040 0F 0F 20 EA C3 25 D1 0F 0F 0F 0F 06 04 11 0A 00 :42 

0050 21 00 00 CD 20 C3 E6 0F 85 6F C9 2C E5 7E CD 47 :26 

D060 D0 22 AC 90 El 2C 7E CD 47 D0 29 29 E5 D1 29 29 :F7 

D070 29 E5 19 E5 D1 El 29 19 E5 D1 2A AC 90 19 E5 01 :IB 

D080 00 00 3A AA 90 26 BE 6F 7E D1 21 00 00 D9 06 08 : IE 

D090 D9 0F F5 30 07 78 61 4F 19 30 01 0C 78 87 47 EB :E3 

D0A0 29 EB 30 01 04 FI D9 10 E7 D9 79 0E 0F 11 40 42 :0C 

D0B0 CD 06 D1 E5 21 B0 90 70 El 0E 01 11 A0 86 CD 06 :54 

D0C0 D1 E5 21 B1 90 70 El 0E 00 11 10 27 CD 06 D1 E5 : 48 

D0D0 21 B2 90 70 El 0E 00 11 E8 03 CD 06 Dl E5 21 B3 : IB 

D0E0 90 70 El 0E 00 11 64 00 CD 06 Dl E5 21 B4 90 70 :C2 

D0F0 El 0E 00 11 0A 00 CD 06 Dl E5 21 B5 90 70 El 45 :8F 


VSUM 4B 52 FB 3D 15 64 29 77 69 3A 48 55 7B 69 30 02 :44 

ADDR «0 *1 *2 *3 *4 *5 *6 *7 *8 *9 *A «B *C *D *E *F :SUM 

CC00 E5 2C 2C 36 01 2D 2D 14 14 3D 5F 18 E7 14 2C 7E :4F 

CC20 2D 2D FE 14 38 C8 ^5 |* C5 3 | 8E 2 ° 2C 2C ?E 2D 183 

CC30 CC 7E 57 2C FE 19 20 12 7E FE 0C 20 08 14 3D 77 :8E 

CC40 2D 72 C3 7D CB 14 3D 5F 18 A4 FE 1A 20 25 7E FE : EF 

CC50 08 20 12 3D 5F CD 78 CC DA 7D CB 2C 2C 36 02 2D :C6 

CC60 2D 73 C3 7D CB 14 D6 02 77 2D 72 2C 2C 2C 36 02 : 69 

CC70 C3 7D CB 7E FE 0C 28 ED E5 21 00 90 06 07 05 20 : 70 

CC80 03 El A7 C9 7E BA 28 06 7D C6 10 6F 18 F0 2C 7E :2E 

CC90 BB 28 06 7D C6 0F 6F 18 E5 El 37 C9 FE 02 C2 01 :4B 

CCA0 CD 7E 57 2C FE 1A 20 IB 7E FE 06 20 0A 3D 2C 2C : 62 

CCB0 36 03 2D 2D C3 2A CD 3D 5F CD 78 CC DA 7D CB 73 :8F 

CCC0 C3 7D CB FE IB 20 27 2C 2C 36 03 2D 2D 7E FE 07 :D9 

CCD0 20 03 3D 18 55 FE 08 20 10 D6 02 5F 15 CD 78 CC :60 

CCE0 30 01 14 73 2D 72 C3 7D CB D6 02 15 18 3C 7E FE : IF 

CCF0 07 20 08 2C 2C 36 03 2D 2D 18 EE D6 03 77 C3 7D :B0 


ADDR *0 ♦ 1 *2 *3 *4 *5 ♦ 6 *7 *8 *9 *A *B *C +D *E +F :SUM 
Dl 00 21 B6 90 70 18 IF 06 00 B9 D8 91 32 AE 90 ED 52 :E5 

Dl 20 3A AE 90 1 8 E3 11 00 C0 01 02 01 3E 35 CD 61 Dl :BA 
Dl 30 11 00 C5 01 02 02 3E 2E CD 37 BE 21 81 90 IE 00 :59 
Dl 40 CD C2 Dl 2E BD 73 2D 72 78 5F 2E 82 CD C2 Dl 2E : 72 
Dl 50 BB 73 2D 72 2D 70 06 02 11 10 C5 CD 85 Dl C3 F5 : 33 

Dl 70 CD 37 BE El 2C 7E A7 28 09 0E 01 IE 0C E5 CD 37 :47 
Dl 80 BE El 2C IE 10 7E 0E 01 E5 CD 37 BE El 2C 7E 1C :D4 
Dl 90 0E 01 E5 CD 37 BE El 2C 7E 0E 01 1C E5 CD 37 BE :13 
DIA0 El 2C 7E 0E 01 1C E5 CD 37 BE El 2C 7E 1C 0E 01 : 13 
D1B0 CD 37 BE AF 0E 01 1C CD 37 BE AF 0E 01 1C CD 37 :3C 
D1C0 BE C9 16 00 7E 4F E6 0F 83 5F 79 0F 0F 0F 0F E6 :DC 
D1D0 0F 82 57 2C 2C 2C 7D FE 90 38 E9 06 00 7B 04 D6 :F3 

D1F0 05 C6 0A 57 C9 11 A0 90 21 0D BF 7E E6 0F 12 2E : D6 


CD00 CB FE 03 C2 67 CD 7! 57 15 FE 19 20 09 72 2C 2C iBe" 

CD10 2C 36 04 C3 7D CB FE 1A 20 3B 2C 7E FE 03 28 29 :E0 

CD20 FE 04 20 13 2C 2C 36 04 2D 2D 5F CD 78 CC 30 01 :C2 

CD30 ID 73 2D 72 C3 7D CB FE 05 20 03 3D 18 E6 FE 06 :9F 

CD40 20 07 3D 77 2D 72 C3 7D CB 3D 77 2D 72 2C 2C 2C :5C 

CD50 36 04 C3 7D CB 2C 7E FE 04 28 E7 FE 05 20 05 D6 : FE 

CD60 02 15 18 C0 3D 18 C3 FE 04 C2 05 CE 7E 57 FE 05 :76 

CD80 CD 78 CC 30 0^ 15 73 2D 72 C3 7D CB 2D 72 2C 2C :6B 

CD90 2C 36 05 C3 7D CB FE 06 20 2B 2C 7E FE 02 20 0C : 97 

CDA0 15 15 2D 72 2C 2C 2C 36 05 <C3 7D CB FE 03 20 0B :BF 
CDB0 3C 15 2C 2C 36 05 2D 2D C3 2A CD FE 04 28 F2 15 : 29 

CDC0 2D 72 C3 7D CB FE 19 20 03 2C 18 F3 FE 07 20 05 :45 

CDD0 15 72 C3 7D CB 15 15 2C 7E 5F FE 02 20 0F 14 CD :D5 

CDE0 78 CC 30 DC 7B FE 06 CA 2A CD C3 EE CB CD 78 CC :1D 

CDF0 38 05 14 7B C3 2A CD 7D C6 06 4F 44 0A FE 03 38 :A5 


VSUM 18 30 Dl A6 53 D9 20 E9 5E 30 FF F4 05 05 4A 5D : 26 

D200 14 7E 47 0F 0F 0F 0F E6 0F 1C 12 78 E6 0F 1C 12 :D3 M 

D230 28 06 02 CD 37 BE 3E 2A 0E 0? CD 37 BE V\ A0 90 :*7C 

D240 IE 10 CD 85 Dl 3A 6F 90 A7 20 2E 21 A4 90 11 B6 : 9B 

0250 90 3E B1 CD 8F D2 7E A7 28 48 1A 3C 12 FE 0A 38 : EA 

D260 41 D6 0A 12 ID EB 34 EB 1A FE 0A 38 35 06 07 21 : 17 

0270 B0 90 36 09 2C 10 FB 18 29 21 A4 90 11 BD 90 3E :E8 

D280 B8 CD 8F D2 7E A7 28 1A 21 B8 90 36 01 18 13 F5 :0D 

D2B0 1C 2C 10 F6 2E B0 06 07 36 00 2C ?0 FB AF 32 6F : F6 

D2C0 90 18 3A 2E BD IE B6 3E AF CD EB D2 AF 32 6F 90 : F8 

D2D0 18 2B IE BD 2E B6 3E B6 CD EB D2 2E B7 1 E B0 01 : 34 

D2F0 30 03 34 C6 0A 9\ \\ ?d FI BB 20 EF *9 4E ^ 89 = ?F 


ADDR +0 +1 ♦ 2 +3 +4 *5 +6 ♦ 7 +8 *9 +A *B +C *D *E *F :SUM 

CE10 7E 15 C6 02 77 2D 72 2C 2C 2C 36 06 C3 7D CB FE :3A 

CE30 0D 2 \l C6 02 2C 2C 3* ™ E8 FE ^ ™ E4 FE ® 5 ™ '' 35 

CE50 3C 77 2D 72 C3 7D CB 3C C3 7F CD FE 0 E 83 ^ ^ 

CE60 7E 57 FE 02 20 £0 2C 7E C6 02 5F 73 2D 72 2C 2C :40 

CE80 0F C6 03 5F CD 78 CC 30 E2 15 73 2D 72 C3 7D CB :8C 

CE90 FE 06 20 0C C6 02 5F 2C 2C 36 07 2D 2D C3 EE CB :C2 

CEA0 FE 07 20 14 C6 03 5F CD 78 CC 30 BF 14 73 2D 72 : 87 

CEC0 3C 5F f 7 6 08 C3 ?D CB C6 03 5F C3 68 CE 2C ?E :93 

CED0 2C 7E 14 14 3C 5F CD 78 CC 30 07 M 2C 2C 36 00 : 57 


VSUM 0A 99 D8 B4 6C BA CE C7 12 63 67 IE DB 0B ED 0D :C4 

ADDR *0 *1 ♦ 2 +3 *4 *5 +6 *7 *8 *9 *A *B *C *D +E *F :SUM 

D300 01 01 01 3A 6F 90 A7 28 02 06 02 3E 37 CD 61 Dl : 89 

D310 11 0D BF 21 B2 90 46 3A 6F 90 A7 28 02 3E F0 80 : 3E 

D320 12 IE 14 2C 7E 07 07 07 07 2C 46 80 12 IE IB 2C : 73 

0340 4A CB 27 CB 27 CB 27 CB 27 3D 6F 26 90 7E 4F 87 :C8 

D350 57 87 82 81 4F 2E A6 7E B8 28 05 2C 7E B8 20 IB :04 

D360 2^ 00 BF 69 7E C6 03 FE 32 38 02 3E 32 77 2C 7E : 8B 

D3A0 C3 00 C0 00 00 00 00 00 00 00 00 00 00 00 00 00 : 83 

D3B0 20 83 FF F8 00 00 3F F8 00 00 00 F8 00 00 00 00 :C9 

D3C0 04 00 00 80 40 00 20 00 00 00 00 04 80 01 E0 00 : 49 

D3D0 03 C7 F0 00 00 FC 70 04 01 F8 38 00 07 9E 1C 00 : 1C 


140 VSUM EB 77 63 D7 A5 2A 42 16 40 25 62 53 D9 BC A9 D4 :EF 


VSUM 50 F0 7A F3 7A 14 2B 69 F9 D3 7E 00 0D 72 El AF :28 
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£L\UWCUd:-3. ^□^A^^'CBAS 
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a© f"- ^ ^ r t o a * ii , in^r-r 

& nif'Sx f> Afo fcot'f **, &©88**— 
#IO*B0l'bt9»4 PC-8801 1 1' 7 iCf, 
i <m*.ui'tz*>c„ 
*ftt*^A*«:4r-3TL4i’i Lfc.SR 
ia»0tt«?VAfrto^t,OAttcri«- 
t©$rfts-j-C*-C < 

Si' it**. 

Ti'SA-*, 'J>Lli: < 

Lfc. 



m i 

»♦♦♦♦♦♦♦ Telephone & Address ♦♦♦♦♦♦♦♦ 



oooooooooooooooooooooo< No. 



Sex I Male 
zip code I 000-11 
Address I lOtaOl 939'9 XX-XX- 
I XX 



Telephone I 
Position I 
Birth Day I 
Aster izm I 
Blood Type I 
MEMO I 
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*'0 '>')'} 9' 41)' 9 
94 919> *30**9* XX-X 
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a f&«M 

PC-8800 '> ') -X&mm (VA frtts) X 

u»it. 

® PC-8800 i' V -X *f* 

®r 4 xr, ?) 
tz < mute l 

yuyyutnxti 



t^'-C BASIC U (OX, AAii tt'ffiPJ 
*-fcinitA 0 «»****»& Ofi< 4:o 
TLii'i L tz **, ®ffiJ< ?**f,ti:A* 
L XfrX < //$ i' 0 A Ijtf&tootzC,, tf 
$Uy 7 4 >\,%XT 4 



i'T < A'?i'„ 






fn^AfriglJjSt* fc, 

® NEW DATA 
® OLD DATA 

iWi'f Sit. i^*-0ttp/ri*i:fnn> f" 
-^4"t-^LTi'4:i' t §«, 



NEW DATA 

fr. ££-fc — t'L"C*5 t Sli, 

OLD DATA 
«rMAT'</'5i'o 
NEW DATA fcHIftt* t. 



’’Are you sure ? " 

fcPIli’-C* it. 

ct-ii, 4L®4r*A-t'Li 5 t, IUhu 
«Lti'fc-f'-^i»*t-«i:}BiL'C L l 7 *■ 

£rt. 



:o/D/7A-ni, 

S AftlilO€i:4:o‘Ci'i t* f , fcofc A 
»5rAiiA*i'Att, ro/7 A©ftsMi:* 
4 MN fci’5*»4r*iL*C<//9i'. 

A’A' l8Ari^77l?f7 (OX, t°a 
K&Z'ikiibX <tS 
Si'o 4:*?, a^7A-rii2 
9*?-9<07 7 4* l LT^oTi 'it 
or. « o ® $»** ivy*? ass© t & 

liSiJOt'/f xtC-fc-fLT < A'5i'„ r" 
-A 77^7P©{tft**t'& 5 t. 1 #10 
A©7'-***^$ftit. ^fflUcffiti' 
S0tt37ynxKt. i A'H h r- 
^«rAn-Ci'4fi't SI*. 

L *>*Asnt:i' 4: 1'li t-rt„ 
Hciza-ry MW iff i 'it. 

=n?>K©ias¥i 

1) ROLL UP 4- 

:0Jf-5rfft fciAc^-iAWtfaiS 

nit. -tnMk©^-^r;©4-*ff 
tt i^-^'i*wc;as$nito 

2) ROLL DOWN 4- 

w © 4 — li 05 © ROLL UP*-©^ 
ij©'*— L i to 0504- tlB] 
It, 'i©4- frfftt, -# 

^©^-•y^nf^thSt-S i 5 i:4co T 
I'it. 

3) CTRL+I4- 

;©4-4-fft tr'-A®A* Afe*i 
to itg05*-(»AA* J iiC i <1 it. if 
0 4rt-*T*«i:L-C Lii'i Lfc**. fe 
**f> tci'A<Dfzx>t-, 

DTi'^ito _h*><i. *05. im Sffi 
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ftflr, 4rtt-m t: 

SBWfc l < ft 

4B. Aft. Asa, afttfto-ci’it. 

fcft/ir<#L'9i'o 

\j]t , 1‘'<'Cfcbh t, KA^JU 

i r u 2 1= 

4 *f, A*CSRL-Cli, INS t DEL # 
-liSfrolfi #A,<D-Cm.MlX < ATS 
I'o CLR*-fc#t fc, k<0 J*B®rt&tt 
t^-cmi-c, ;*-y;Hi*®Jf B®-# 

HU t- ^ ito 



U7,h1 



2 fc. JSB 0 1 *££<: i'4ts DEL 
*- £#Tfc io*0«Bi:U Ht. 
DEL4-* f ^i4 01iZ0t Stfttt'to 
^-y,***— #£lii;i: < s t Slfttfjcifc 
corns WAiT 

RETURN af—irffLT Li ofct, DEL 

*-*«• L T HU0iI§ i:fto f < *5# 

4) CTRL+W #— 

frfrfcfci'fc, ^o*>< ArtLA:^-*** 
H Li 5, 



5) CTRL+L 4f — 

mu, 

_S«ce»:«i'i+. T«I. 
INPUT NUMBER 

fcPfli .'-CUO-r, L 

T < 

6) CTRL+P 4f- — 

r'— V h 7? h L it, 10® 

ry>h 7 * nr, 

V>cw* Lit. 

7) CTRL+Q 4f— 
T’DmWTUto 
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5120 GOSUB *WDATA 
5130 NEXT:CLS: N= 1 
5140 RETURN 2010 
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4 1- tl3i'fMr*ft* f c><> < Olio -Cl'S 
©ft* 1 , 3*14 4 /.?£*. 4* A. 
y-hOTt: [Mb] [**] [»7] t 
nt i' s ©* f 3 y)n — 

to 

*^14, [»»] Cio-Cl'i to 
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* « INIT SECTION » 
•START 

GOSUB "I NIT. PROG 
"RESTART 

GOSUB "I NIT. GAME 

• « MAIN SECTION » 



87.12.25 TAKED2 



1130 WHILE EVENT 1=0: WEND 

1140 IF EVENT 1=-1 THEN GOSUB "CHECK . END : GOTO *MAIN.LOOP 
1150 IF EVENT 1 = 1 THEN "RESTART 

1160 IF EVENT 1 = 2 THEN "PROG. END 

1170 END 



*1 NIT. PROG 

WIDTH 80 , 25: CONSOLE 1 ,24,0,0:DEFINT A-Z:SCREEN 2. 0 . 0 ,3:0PTI0N BASE 0 
DIM UN I T ( 4 1 , 4 ) . GTBL ( 4 ) , GWORK ( 1500). MOVTBL ( 1 0 , 2 ) , UN I TBL ( 4 1 ) ,FONTX(18) 
SCREEN WIDTH 5 , 640 . 1 : BUFFER #0 . 640 . 400 , 1 ; 640 . 640 . 1 ; 640 , 20 . 1 
SCREEN WINDOWS #0 . ( 0 . 0 ) , 400 . 0 : SPRITE SCREEN 1 

ON ERROR GOTO "ERROR . SECT I ON : ON STOP GOSUB "STOP . SECT I ON : STOP ON 
RETURN 



1 

* << INIT GAME >> 
"INIT. GAME 



^ 88 VA IZOLVC 

ZtD^a^yAlt, iifefcfj. r Oh ! 98j t* 
PC-9800 S' 9 — x'ffl Cftso tz r- * 4* <: 
88V A C » fit L £ L A. N88-0 * If 
BASIC V3B98IKO N88-BASIC (86) MS 
-Dos®t rwii^-r 

LA** 1 , ^9X^71 -y?W%U. t'-f 
B#W©^« r«o-Ci'£t. 

88 V A L^i'^yay-ft. 

4-0 B XT’? 4 h &4gtiME4 £B 

f^^A©*'** 1 . 

T r PENCIL WARS ^H)Sj 
Ai- kJBo-Ci’£t. 
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MOUSE. SPEED* 200 

EVENT 1 = 0 : X . W I NDOW* 8 : Y . W I NDOW* 2 
RANDOMIZE VAL (MI D$ ( DATES ,1,2)) 



I. ' N I T ( 4 1 , 1 ) =20 : UNIT( 41 , 2 ) =20 
SCREEN I NIT 

GOSUB ^SCREEN . CLS : BUFFER* 0 

LINE (0,0)-(639, 16) , 1 ,BF:LINE (0,16 

LINE ( X . W I NDOW , Y . W I NDOW ) -STEP (625,3 



)+VAL(MID$(DATE$, 7 , 2 ) ) +VAL( MI D$( TIMES, 1,2) )+VAL(MI D$(TIME$, 4 , 2 ) ) +VAL(MID$(TIME$ 

*INT(RND( 1 )*200 )+16:UNIT( I , 4)=100:NEXT I 
T( I ,3)*592-INT(RND( 1 )*200 ) : UN I T ( I ,4)=5:NEXT I 



0 ) , 0 : LINE (X. WINDOW. Y.WINDOW+3 



BUFFER*0 

GTBL(1 



0 , BF : L I NE (X. WINDOW+433, Y.WINDOW+344)-STEP(80, 17) 
0 : GTBL ( 3 ) * 0 : GTBL ( 4 ) = 639 : GOSUB *GPR I NT : GTBL ( 1 ) * 2 : GPCHR$= " 7 V 4 *> : 



, 1 , , VAL( "&H"*WORK$) :LINE ( 



BUFFER* 1 : L I NE ( 0 , 0 ) - ( 608 . 624 ) . 1 , BF 
LINE (10, 38) -STEP (580 , 0 ) , 0 , , &HAAAA : LINE ( 1 0 . 66 ) -STEP(580 , 0 ) , 0 , , &HAAAA: LI NE 
FOR 1=80 TO 570 STEP 14:LINE (10,1) -STEP ( 580 . 0 ) , 0 , , &H8888 : NEXT I 
LINE (10,583) -STEP ( 580 , 0 ) , 0 . , 8.H80 : L I NE (10,584) -STEP( 580 . 0 ) . 0 . , &HAAAA 



B «MOUSE . CSET : M 



6,15-1) -STEP ( 1 6 , 0 ) , 1 
0, 67 )-STEP( 580,0 



: LINE (X. WINDOW* 5 
: 2i 

B *GPRINT 



, VAL( "&H"+WORK$) : NEXT I 



♦MOUSE . EVENT 1 : MOUSE ( 



• << GRAPHIC SECTION > 

SCREEN C 

♦SCREEN . CLS 
FOR 1=0 TO 
RETURN 

J *GPRINT 
G=0 

: ( GTBL ( 2 ) , GTBL ( 3 ) 
THEN GPXWORK=GTBL( 2 



ER* I : CLS 2: NEXT I 
GRAPHIC CHARACTOR PRINT 



KANJIFLG=0 
IF GTBLd )*0 THEN L. 
GPXWORK=LEN(GPCHR$)* 
IF GTBLd ) * 



■ ( GTBL ( 4 ) , GTBL ( 3 ) ♦ 1 5 ) . 1 , BF . 1 : GOTO *GPR I NT . RETURN 



IF GTBLd )*2 THEN GPXWORK=GTBL( 4 ) -GPXWORK 

IF GTBLd )*3 THEN GPXWORK* (GTBL( 4 )-GTBL( 2) -GPXWORK )/2*GTBL( 2) 
FOR GPI = 1 TO LEN(GPCHR$) 

IF KANJ1FLG* 1 THEN PUT ®( GPXWORK, GTBL( 3) ) ,KANJI (GPCWORK*2 
GPCWORK* ASC (MI D$ ( GPCHR$ , GP I , 1 



1+ ASC (MI D$ ( GPCHR$ , GPI , 1 ) ) ) :GPXWORK=GPXWORK+16:KANJIFLG*0:GOTO *GPRINT 



) THEN KAN J I FLG* 1 : GOTO *GPRINT. NEXT ELSE KANJIFLG*0 
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F UNIT(UNITNO, 1 ) = 1 THEN BUFFER* 2 : GET 9 



0 * UNIT REMOME 

0 "REMOVE. UNIT 

0 GOSUB *PUT.UNIT:UNIT(UNITNO,l 

0 IF UNITNO<21 THEN UNIT(41,1)= 



< PRINT SECTION > 



E UNITC41 ,2)*UNIT(41 ,2)-l 



2600 "PRINT. INFO 



INFORMATION P 



7 : GTBL ( 3 ) =0 : GTBL ( 4 



): GOSUB "GPR I NT 
): GOSUB *GPRINT 



N BUFFER*2:GET 9(0,0 )-STEP( 16. 16) .GWORK 
N BUFFER* 2: GET §( 16,0)-STEP(16, 16) , GWORK 
OW* 1 7 , Y .WINDOW* 1 7 ) - ( X . WI NDOW+625 , Y . WI NDOW+336 ) : VIEW C 
1 .NY.UNIT-MAPLINE*16+15).GWORK:WINDOW (0.0)-' * 



X.WINDOW+625, Y. 



IF MPI =MAPLI NE THEN CIRCLE ( X. WI NDOW+9 , Y. WI NDOW*MPI«l 6*8 ) , 
NEXT MPI 

FOR MPI *MAPLINE TO MAPLINE* 19 
BUFFER* 1 : GET 9(1, MP 1*16—15) -STEP (607.15), GWORK 
BUFFER=0:PUT 9(X.WIND0W*17, Y.WINDOW+(MPI-MAPLINE)*16*17) ,G 



<MOVE> < ATTACK > REVERCE 

"PRINT.REVERCE 

IF CFLG*0 THEN CFLG*I ELSE CFLG=0 
BUFFER* 0 : GET 9( 120,0)-STEP(78. 15) .GWORI 



. 0 , . , ,F,0 ELSE CIRCLE (X.WINDOW+9.Y. WINDOW* 16*MPI *8 



T 9( X . WI NDOW+338 , Y . WI NDOW+3 



0 "CHECK. UNIT 
0 HITUN1T*0 
0 FOR HITUNIT*! 



1)00 THEN IF UN I T ( H I TUN IT,2)*<X.UNIT THEN IF UNIKHITUNIT. 2)*16>X.UNIT THEN IF UNIT(HITUNIT,3)=<Y.UNIT THEN I! 
T THEN "UCEXIT1 



3000 IF NX.UNIT<0 OR NX. UN IT >597 OR NY.UNIT<0 OR NY. UN IT >6 10 THEN GOSUB "REMOVE. UNIT: GOTO "MOCRETURN 
3010 X. UN IT* NX. UNIT: Y. UNI T=NY. UN IT: GOSUB "CHECK. UNIT: IF HITUNITOf AND HITUNIK >UNITNO THEN "UCRASH 

3020 X . UN I T* NX . UN I T + 1 6 : Y . UN I T* NY . UN I T : GOSUB "CHECK. UNIT: IF HITUNITO0 AND HITUNIT< >UNITNO THEN "UCRASH 

3030 X . UN I T= NX . UN I T : Y . UN I T= NY . UN I T* 1 6 : GOSUB "CHECK. UNIT: IF HITUNITO0 AND HITUNIK >UN I TNO THEN "UCRASH 

3040 X . UN I T=NX . UN I T* 1 6 : Y . UN I T=NY . UN I T* 1 6 : GOSUB "CHECK. UNIT: IF HITUNIK >0 AND HITUNIK >UN I TNO THEN "UCRASH 

3050 GOSUB "PUT . UN I T : UN I T ( UN I TNO , 2 ) = NX . UN I T : UN I T ( UN I TNO , 3 ) = N Y . UN I T : GOSUB "PUT. UN IT: GOTO "MOCRETURN 
3060 "UCRASH 

3070 GOSUB "REMOVE. UNI T:SUNITNO*UNITNO:UNITNO*HITUNIT: GOSUB "REMOVE. UNIT: UN I TNO=SUNI TNO 
3080 "MOCRETURN 



3160 "PXCHK 

3170 IF M0V1 X<M0V2X THEN PAW*1 ELSE PAW=-1 
3180 FOR PAI 2=M0V1 X TO M0V2X STEP PAW* 10 



1 : UN I TBL ( UN I TBL ( 1 



3230 "PYCHK 

3240 IF MO 

3250 FOR PAI2=Mi 



M ! =0 THEN Y . UNIT*M0V1X*4 ELSE X.UNIT*INT( (PAI2-BPRM! )/APRM! >*4 
F UN I TBL ( UNI TBL ( 1 )*1 )< >HITUNIT THEN IF HITUNIK MJNITNO THEN UNITBL( 1 )*UNITBL( 1 ) 



l:UNITBL(UNITBL< 1 ) 



3320 RETURN 
3330 * 

3340 "CHECK. SERCH 



PLAYER UNIT SERCH 



FOR PUN I TNO* 21 TO 4 
IF UNIT(PUNITNO, 1 ) 
NEXT PUN I TNO 



>0 THEN IF ABS ( UN I T ( PUN I TNO , 2 ) -CXPO I NT ) < CHLEN THEN IF ABS(UNIT(PUNITN0,3)-CYP0INTKCHLEN THEN "PSEXIT 



3380 PUN I TNO* 0 



3440 "PLAYER. SECTION 

3450 IF UNITN0<21 THEN GTBL( 1 )*1 :GTBL( 2 )*X.WINDOW+ 8 :GTBL( 3 )=Y.WINDOW+ 344 :GTBL( 4 )=X.WINDOW* 320 :GPCHR$*”^nUn>tf 3 -*^i|(DlR|fllTt " : GOSUB 
"GPRINT : GOTO "PARETURN 

3460 RESTORE "MOUSE. PENCI L: GOSUB "MOUSE. CSET 



1 )=UNIT(UN1TN0,2)*X.WIND0W*21 :MOVTBL( 1 ,2)*UNIT(UNITNO,3)*Y.WINDOW+38-MAPLINE*l 



3490 WHILE MFLG=0 : WEND 
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MOUSE (1) OFF: ON MOUSE<2) GOSUB *MOUSE . EVENT 1 

IF CFLG=0 THEN GOSUB *PLAYER.MOVE ELSE GOSUB *PLAYER. ATTACK 

GOSUB ^COMPUTER . SECT I ON 



1 THEN EVENT 1 *- 1 



*PLAYER.MOVE 



PLAYER MOVE 



NY . UN I T =MOVTBL ( UN I T C UN I TNO , 4 ) , 2 ) - Y . W I NDOW- 37+MAPL I NE* 1 



3690 RETURN 



PLAYER ATTACK 



COMPUTER SECTION 



) : CHLEN=UN I T ( UN I TNO , 4 ) : GOSUB m 



COMPUTER MOVE 



3790 ^COMPUTER . MOVE 

3800 UNITNO=PSUNITNO-20 : IF UNIT(UNITNO, 1 >=0 THEN FOR UNITNO*l TO 20: IF UNITtUNITNO, 1 ) =0 THEN NEXT UNITNO 
3810 IF UNIT(PSUNITNO, 1 )=0 THEN FOR PSUNITNO-21 TO 40: IF UNITIPSUNITNO, 1 )=0 THEN NEXT PSUN I TNO : GOTO *CORETURN 

3820 PXPO I NT* UN I T ( PSUN I TNO , 2 ) 

3830 CXPO I NT* UNITtUNITNO, 2' ‘ ~ 



X . UN I T=CXPOI NT : NY . UN I T*CYPOI NT 

0 : W I NDOW ( X . W I NDOW* 1 7 , Y . W I NDOW+ 1 8 ) - ( X . W I NDOW+ 625 , Y . W I NDOW+336 ) : V I EW ( 

' X.WINDOW+22, UNITtUNITNO. 3 



X=CXPOI NT : MOV 1 Y*CYPO I NT : MOV2X*UN I T ( PUN I TNO , 2 ) ♦ I NT ( RND ( 1 > *UNWORK ) - I NT ( UNWORK/2 ) : 



) : V I EW (X.WINDOW+1' 



X. WINDOW+625, Y ,WI NDOW+336 ) 



4060 RETURN 
4070 ‘ 

4080 * << GAME OVER SECTION > 

4100 *CHECK . END 
4110 MOUSE (2) OFF: BUFFER= 0 
4120 BUFFER* 0 : LI NE (100,10 
4130 GTBL( 1 )*3:GTBL(2)= 100 



i:GET 9(120,0 )-STEP(78, 15 ) ,GWORK:PUT 9(X.WINDOW+530, Y.WINDOW4 
I ) -STEP( 440 , 1 20 ) , 0 . BF, 1 
GTBL( 3 ) * 1 1 0 : GTBL ( 4 ) *540 : GPCHR$= 



GTBL( 1 )=3:GTBL( 2 ) 



NIT( 41 , 2 ) >0 ) OR ( UNIT ( 41 
' ELSE GPCHR$="*»* 

= 100: GTBL ( 3 ) * 1 36 : GTBL ( 4 ) =540 : G 



w*-* =' 

D UNIT(41,2 



►STR$(UNIT(41 ,2) )♦ 
)*<0) THEN GPCHR$* 



-tvm* j * 

___ B *GPRINT 

_N MOUSE ( 2 ) GOSUB *MOUSE. EVENT4 
IF UNIT( 41 , 1 ) >0 AND UN I T ( 4 1 . 2 ) >0 THEN GPCHR$= " £ U $ 1* ? " : GOSUB *YESN0:IF EVENT4*2 T! 



) , GWORK , XOR 

*** 51 ***•• 



"♦STR$( UNIT (41,1 )) 
ELSE IF UN I T ( 4 1 . 1 > 



4220 MOUSE ( 



K:PUT 9 ( X . W I NDOW+ 530 , Y . W I NDOW+ 345 ) , GWORK , XOR 



YES NO SELECT 



80 , 1 7 ) , 0 , BF, 1 : LINE (336, 1 88 )-STEP( 80 , 17 
4 : GTBL ( 3 ) = 1 89 : GTBL ( 4 ) = 304 : GPCHR$= M li " : GOSUB *GPRINT 
416: GPCHR$* " l' X " : GOSUB *GPR I NT 



) *3: GOSUB «GPRINT 



4350 RETURN 



0 ) -STEP (78,15), GWORK : PUT 9 ( ( EVENT 4+ 1 



: Y . MOUSE*MOUSE (5,1) 



RETURN 
• << END SECTION > 



Y. MOUSE >188 AND Y.MOUSE<204) THEN EVENT4=1 
Y. MOUSE >1 88 AND Y.MOUSE<204) THEN EVENT4*2 



0: GOSUB *SCREEN . CLS 



RETURN 
• « STOP SECTION > 



< ERROR SECTION > 
TERROR. SECTION 



4570 RESUME Ni 
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1SOOBP! 
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■ ftu 



ilfflSglEOOBPS (BIT/sec) 0^7*41*9)0 

bps cfettBuriis^Barfe&orgi'BX. 

&ll 0 




• MD1200E 
WAP» 
24.800R 



S«S5t/£ZS NCUESVAA BWMB/CCITT V21/22, 
BELL 103/21 2A □?>K/'Vi'XAT, CCITT V25bis 
^Ua/168(W)x250(D)x37.5CH)(ran), SS/fD500g tJUZ 



^AlCOUrfllB&UtUaAiato 
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5 0 ^Ail a/'CVP><t/r>'a>««B 
@Si^ffioro^<r/c(»©t©o 
AV3>©«ffllC-DL^rU«RS-232 
C Ml? C^ASoact, RS-E32C /)' 
&mr<«7*3>*JMB* OEMS?) 
B11MU«D7*P$W (£3Kfl«) (3ft 
*.(*■), SiS0Slcth©-r5o £/cSI£ 
[sHilCcfc 0 A-dZ s fc7±P '/flWSza > 

bfzL-^ffl©5 , y^ju«^cj^x.r (a 
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• PV-A1200Mk I (AIWA) 26, BOOR 




I aEGift/«BiEi«. PBXfflioi*i aasa/^za ncu» 
55/AA. MA, MM aWMBS/CCITT V21/22, BELL 103/ 
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b/i .2kg ac -pyy??m\ z<£‘osa©g5£(t, 
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• LIGHT SPEED1200 (HWS/^AWSraf) 
18.800R 
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• COMSTER 1212 (NEC) 
43. BOOR 





• SR-1B0S iXTjy) 
89.800R 



I 5S«SSC/^za NCU JT35S/AA, MM 51«)8«/CCITT 
V21/22 □ v’ > K/CCITT V25bis 9V tffc/l 60x285 x 
50 (mm) BS/1.2kg 
mit, ewb«B9. 



(»aiww ncu i&ai 

AAR®, asS«ffiffl8tMA, MM iMBUS/CCITT V21/ 
22, BELL 103/21 2 A □ ?> K/'WX AT ?t-Tt>£/44x 
200X140 (mm) BS/0.5kg □>/£7h^‘3tttD«Be‘9-f' 
7 



I jM75SC/±ZM NCUff55S/AA, MM a«»«/CCITT 
V21/22, BELL 103/212A □ 7>h7'WX AT 
220X 250 X78 (mm) BB/ti 2 kg $WJ>7IWPCa5lva 



• LDT-1830 (Logitec) 
39. BOOR 
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89.800R 12 AT ^1^/203 x280X45 dim) MNPI^-Zl^hD-^ 

■ (7T72/3» (mnp ttw^n=iAia©fiaH«) 




I a«S5S/±Z« NCU»5S/AA. MA, MM !§!(§/ 
CCITT V21/22/22biS, BELL 103/212A □ ?>H7 / \T 
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V-A1200Mk I 




7A*^<Z)8Sfa 
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#Ltf„ itit'l, 
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'j VA077 7 1 
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i fi^©VA0#m. t'*’i 5 fU;4>? 
j ^lSA,i'^;<JA.©fe«D^t'fct'l 

j Hfc-. 4-088©^ 
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• fc88Srl&&U |5H#i:£ 
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! EiVnu**/ 




887Uti>h 



o 

<De*r*t. swwfcfctM^Eo 

0 

CD r SOUND PACK 

128j ^3«i^x>7*-^10€Co 

0 

®Z$i>XBC<tiD r CGf-f^j ^btf>S 
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Cl#aCD73B7Xr-SSI**C#a©^Hf>SS^ 1 
^«EUr<fc**L\ 0 9MI**K3« (4£BIBfR9B?£) E 
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Ohj88 ■MSIflHB 



• Oh! 88 IB*£ • Hrn 1 *]R 

fr##, 

-* vX’-V'kmZLX UiZv\ »Pn1ti®5SCfJ## « 



iTo <fc-$L' 0 



t 102*£irHtHE*.a* 2-3-26 #MW 
§ 0 *V 7 ► Oh! 88 Kr» 1 f* 

•£**«( 

-hIB*T«C, KHfflte, #iJ:t/ilS5fe5:WiBLT60n«)^$:liofc 

im%ifa*m*Lx < 

fc&'K'fc/il'fclIMffiilttli, f*!f)'<b^*TC|gSL*To tztil, 

TfB<n>±*a^ibftTi'nc (.'!»£•, A'ta* t<nx-, khfrt 

*fcSfc£<7)fctf>, 0«l=BMD*<A'A'y It. 

•&*±<7>;±it 

KW^H+SrHtO <n 

Wktm'bfiBftX-, P.I60E*WA^«BizT*f#(tLi-r. *>bt' 
C4f>«|gT-/\-y<7)^*lioi'TC-{tlS< fc'?l'. COTJtfflfflifrcU:. A 

h vTOUC-Ol'T-tf-tf- h L4f„ fcfcfL, 



(D$Z)t£|il1)&'i : T^>i&i& 5 ^ (Syntax Error, Illegal Function Call, Subscript 
Out of Range, Wend without While t£ tl <7)1* -^li, fc •) l'*, 

(DStfSIfta, *M&-? ')>*<»&&, mtn&Xlzrmx liftoff) r - 
£ LT/N-->a>7'-y7 , <7)##i:$-tf-Tl,'fc^#ir*'', «<n 
ElSliaLS-B-Ao 

®V->>g<7)JT%Ji*'^a, DISKBASIC, MS-DOS<7)lR >J ®i,'^C if, 
WttrtS, VXi7;U«rttBtrntfC.-3*l'fc^(t*rt«C-3l'T<7>Z- 
KIHKirSJ[<K<H\, 

®C-KW(i, P. l 60 IBtt< 7 )/\-^«Sfc L < «frWffi»(=Tfclil' LJt. 
fF%izmmcnz-nffiitx-£ ^•t^■^„ 

I *JiLh«»Lfci»* t f?m< 7 )W-£tZj; »J, 7 W< 7 )fTiEW 
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■ #^*^<75 =1 > L'cl - ^ ir-y *'A - CL - 

X„ SS^^^tt/c^^tC-BS + OTSUN 3 
(UNIX ^-/Xf-'y 3 >^->><75^.7. 
h -tr 7 — ) A < 1 l' # <c y F*y/?> K •y * > 
£fM£$r&S5T, **>>br *,ib<7)W5E^ 
*7-r XX-i«T^*8?. 
fA^ P ^7 5 

«itf, £(:*'< K>y*>«ScL'„ n 
<75V->>(i/;V.'L J: ■9.5*.A'L‘bAo I 

¥ . t> 4 < m) 

■#®<75 Oh ! 88<75ft*«, i)0i y fesSs/c 
ofco ilil't *<7)3IB/)'£>$r^7 0 t 

x, zfny^Aiziti-oXii^tz (tu 

I'-J-xy-t >S-7 T 77 ? -/<—*— fc 
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TEL 03-237-7895 FAX 03-263-9754 
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